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Inside Level I: Learn how 
to better utilize its 
commands. Pg. 96. 

Testing 1, 2, 3: Interface 
your 80 with test . 

equipment. Pg. 136. 

Computer Trainer: Helps you 
understand Assembly 
Language. Pg. 118. 

Special Graphics Issue: Explore 
the full graphics potential of your 
system. 




Plus: 

Software Reviews, Hardware 

Reviews, Book Reviews. 

More than 30 articles and columns. 



From PEP5CM 



One-Drive System: 

S399. (40-track) & $675. (77-track) 
Two-Drive System; 

$795. (40-track drives) & $1350. (77-track drives) 
Three-Drive System: 

$1195. (40-track drives) & $2025. 177-track drives) 
Requires Expansion Interlace, Level II BASIC & 16K RAM 




Low Cost Add-On Storage for Your TRS-80*. 

In the Size You Want. 

When you're ready for add-on disk storage, we're ready for you. 
Ready with six mini-disk storage systems — 102K bytes to 591 K bytes of 

additional on-line storage for your TRS-80*. 



• Choose either 40-track TFD-100™ drives 
or 77-track TFD-200™ drives. 

• One-, two- and three-drive systems im- 
mediately available. 

• Systems include Percom PATCH PAK 
#1™, on disk, at no extra charge. PATCH 
PAK #1"" de-glitches and upgrades 
TRSDOS for 40- and 77-track operation. 

• TFD-100™ drives accommodate "flippy 
disks." Store 205K bytes per mini-disk. 

• Low prices. A single-drive TFD-100 "' 
costs just $399. Price Includes PATCH 
PAK #1™ disk. 

• Enclosures are finished in system- 
compatible "Tandy-silver" enamel. 



Whether you need a single, 40- 
track TFD-100™ add-on or a three-drive 
add-on with 77-track TFD-200™s, you 
get more data storage for less money 
from Percom. 

Our TFD-100™ drive, for example, 
lets you store 102.4K bytes of data on 
one side of a disk — compared to 80K 
bytes on a TRS-80' mini-disk drive — 
and 102.4K bytes on the other side, too. 
Something you can't do with a TRS-80* 
drive. That's almost 205K bytes per 
mini-disk. 

And the TFD-200™ drives provide 
197K bytes of on-line storage per drive 



— 1 97K, 394K and 591 K bytes for one-, 
two and three-drive systems. 

PATCH PAK #1™, our upgrade 
program for your TRSDOS*, not only 
extends TRSDOS* to accommodate 40- 
and 77-track drives, it enhances 
TRSDOS* in other ways as well. PATCH 
PAK #1™ is supplied with each drive 
system at no additional charge. 

The reason you get more for less 
from Percom is simple. Peripherals are 
not a sideline at Percom. Selling disk 
systems and other peripherals is our 
main business — the reason you get 
more engineering, more reliability and 
more back up support for less money. 



In the Product Development Queue ... a printer interface lor using your TRS-80* with any 
serial printer, and . . . the Electric Crayon "to map your computer memory onto your color TV 
screen — for games, animated shows, business displays, graphs, etc. Coming PDQ! 




PERCOM DATA COMPANY. INC. 
211 N. KIRBY • GARLAND. TX. • 75042 



™ TFD-100 TFD-200 PATCH PAK and Electric Crayon are trademarks ol PERCOM DATA COMPANY 

•TRS-80 and TRSDOS are trademarks ol T andy Corpofaiion and Radio Shack wWch nave no relationsfMp 10 PERCOM DATA COMPANY. 

To order add-on mini-disk storage for your TRS-80* . 
or request additional literature, call Percom's toll-free 
number: 1-800-527-1592. For detailed Technical infor- 
mation call (214) 272-3421. 

Orders may be paid by check or money order, or 
charged to Visa or Master Charge credit accounts. Texas 
residents must add 5% sales tax. 



Percom peripherals for personal computing 





The easiest, least expensive way to generate 

spectacular multi-color graphics, sharp two-color alphanumerics: 

Your computer, a color tv set and the Percom Electric Crayon™. 



Add the Electric Crayon™ to your 
system and your keyboard be- 
comes a palette, the tv screen 
your medium. 

You dab and stroke using one- 
key commands to create dazzling 
full-color drawings, eye-catching 
charts and diagrams. 

Or you run any of innumerable 
programs. Your own BASIC lan- 
guage programs that generate 
dynamic pyrotechnic images, 
laugh-provoking animations. 

From a combined alphanu- 
merics-semigraphics mode to a 
high resolution 256- by 192- 
element full graphics mode, the 
microprocessor-controlled Electric 
Crayon™ is capable of generating 
10 distinctly different display 
modes. 

Colors are brilliant and true, and 
up to eight are available depend- 
ing on the mode. 

As shipped, the Electric 
Crayon™ interfaces a TRS-80* 
computer. It may be easily 



adapted for interfacing to any 
computer or to an ordinary parallel 
ASCII keyboard. 

But that's not all 

The Electric Crayon is not just a 
color graphics generator/control- 
ler. 

It is also a complete self- 
contained control computer. With 
built-in provision for 1K-byte of 
on-board program RAM, an 
EPROM chip for extending EGOS™, 
its on-board ROM graphics OS, 
and a dual bidirectional eight-bit 
port — over and above the com- 
puter/keyboard port — for 
peripherals. The applications are 
endless. 

Shipped with EGOS™, 1K-byte of 
display memory and a com- 
prehensive user's manual that in- 
cludes an assembly language list- 
ing of EGOS™ and listings of 
BASIC demo programs, the Elec- 
tric Crayon™ costs only $249.95. 



Options include: 

• LEVEL II BASIC color 
graphics programs on 
minidiskette: $17.95. 

• A 34-conductor ribbon 
cable to interconnect the Elec- 
tric Crayon™ to a TRS-80*: 
$24.95. 

• RAM chips for adding re- 
fresh memory for higher den- 
sity graphics modes: $29.95 
per K-byte. 

• Electric Crayon™ 
Sketchpad, a sketching grid 
of proportioned picture ele- 
ments (pixels) in a tv aspect 
ratio. For 128 x 192 or 256 x 
192 graphics modes. 11 -inch 
by 17-inch, 25-sheet pads. 
$3.95 per pad. 

SYSTEM REQUIREMENTS: the video cir- 
cuitry of the Electric Crayon™ provides di- 
rect drive input to a video monitor or mod- 
ified tv set. An internal up-modulator for rf 
antenna input may be constructed by add- 
ing inexpensive components to the existing 
video circuitry. 

Prices and specifications suited lo cnange without notice 
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PERCOM DATA COMPANY. INC 

211 N KIRBY GARLANO TEXAS 75042 
12141272 3421 



*" •= trademark of Percom Data Company, Inc 

• = trademark ot Tandy Radio Shack Corporation when nas no relationship to Percom Data Company 

Get into computer color graphics the easy, low-cost way with a Per- 
com Electric Crayon™. Available at Percom dealers nationwide. Call 
toll-free. 1-800-527-1592, for the address of your nearest dealer, 
or to order direct if there is no Percom dealer in your area. 
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SPECIAL DELIVERY with EXTRACT 

A A 100% Machine Language Word Processor a 





TRS-80 R + Electric Pencil R or Radio Shack's Scripsit 



We can't stop improving and expanding the capabilities of your 
TRS-80*! By using SPECIAL DELIVERY with EXTRACT and either 
Electric Pencil R or Radio Shack's Scripsit 9 you can get even more 
out of your computer. From just one program, you will get all this: 



MAILFORM: Create MAILFILE: The 
ONLY complete name and ad- 
dress list entry /editor program 
written in machine language. 
Instant search on any field, 
complete cursor control, just 
fill in the form! 

MAILRITE: Print letters written with 
either the Electric Pencil* or 
Radio Shack's Scripsit® insert- 
ing information from a MAIL- 
FILE into the letter for person- 
alizing and addressing. You 
can send a personalized letter 
to one person then a different 
personalized letter to a second 
person with true typist quality 
from your fine printer. Fea- 
tures: Indents, Underscore, 
Bold Type, End of Page Stop, 



Address Envelopes, unlimited 
insertion from address list and 
More! 

EXTRACT: Take out information 
from MAILFORM, the ma- 
chine language mailing list. 
Find the names you need by 
Zip Code, Street Address, 
Gender, Age or any other way! 

SORT: In-Memory sort on an entire 
address list using any field as 
the key. This program can sort 
an entire list in a matter of 
seconds! 

LABEL: Prints labels from MAILFILE. 

CONVERT: Make MAILFILE from 
RS mail list. 



SPECIAL DELIVERY will run on your TRS-80' with TRSDOS; NEWDOS" or any 
other TRSMike DOS. 

If you bought SPECIAL DELIVERY from us, send us the disk and we will update 
it to include EXTRACT for $25. If you haven't already taken advantage of our 
SPECIAL DELIVERY program, we'll send you the complete program including 
EXTRACT for just $125 (Disk). We can also send you the Electric Pencil' 1 on Disk 
for $150. 




Software Etc . . . 
1839 Chamberlain Drive 
Carrollton, Texas 75007. 
Phone Orders: (214) 492-0515 
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Demand a Demonstration from your local Dealer or write for a brochure of our complete line of fine software. 
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APPLICATION 

148 Quiz Master. Is this the answer? Richard Eckert. 

BUSINESS 

130 Accountants Aid. A workhorse worksheet. James Sheats. 

GENERAL 

38 The Game of Life. Play God for a day. Dennis Kilsz. 

62 Adventures in Roseland. Interesting displays. Allan Joffe. 

65 Randomness. Is your 80 really random? Todd Carpenter. 

72 Doodle Bug. Pen and paper saver. Daniel Bishop. 

78 Kaleidopen. Computerized kaleidoscope. Robert Nicholas. 

82 Realtime Graphics. PEEK and POKE fun. Richard Zidonis. 

96 Inside Level I. Baby brother grows up! Robert Meushaw. 

106 Double Size Graphics. Larger than Life? Bertram Thiel. 

118 TRS-80 Trainer. Display your registers. William Colsher. 

124 EDTASM Index. Find references quickly. Terry Kepner. 

HARDWARE 

154 Fuse Fix. Save on repair charges. William Winter. 

INTERFACE 

111 DECwriter Driver. Terminal I/O made easy. James Beauchamp. 
136 Testing 1,2,3. Check your measurements. D. C. Nelson, 
142 Teletype Interface. El cheapo printout Peter Noeth. 

REVIEW 

92 Applications Software. Micro packages. Rod Hallen. 

SOFTWARE 

116 True or False? Computerized pattern recognition. John Krutch. 

STYLE 

140 Keyboard Interogation. Key Information? M. Yarbrough & J. Vosteen 

UTILITY 

88 Hex Display. Turn your FF into Decimal. Dr. H. Campbell. 
132 Buffer Analysis. Display your ASCII. Robert Chambers. 
134 Display Formatting. Tidy screens. Allan Joffe 
146 CLOAD Assembly Language. Get an autostart. Arthur Baker. 



REGULARS 

8 80 Remarks. Wayne Green 

10 Input. Why not you 

12 DEBUg. /. N. Error. 

14 Reviews. Chris Brown. 

20 80 Accountant. Michael Tannenbaum. 

20 Captain 80. Bob Liddil. 

22 The Assembly Line. William Barden, Jr 

Cover by Clare McCarthy 



28 80 Applications. Dennis Kitsz 

32 Unlimited 80's. Sherry Smythe. 

32 Club 80. Ross Wirth. 

34 NEWS. Nancy Robertson. 

162 Preview. Next month in 80. 
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META TECHNOLOGIES 



• NEW* MTCAIDS-III* *NEW* 

MODEL I . . $69.95 MODEL II . . $99.95 

Introducing the latest addition to MTC's family of data management systems, AIDS III. NO 
PROGRAMMING, easy to use COMPLETE PACKAGE including demonstration application, 
documentation and MAPS III (see below) 

• Up to 20 USER DEFINED FIELDS of either numeric or character type. 

• CHARACTER type fields may be any length (total: up to 254 characters) 

• NUMERIC type fields feature automatic formatting, rounding, decimal alignment and 
validation. 

• Full feature EDITING when adding or changing records 

ENTER FIELD (can't type-in more character than specified) 
BACKSPACE (delete last character typed) RIGHT JUSTIFY FIELD contents 

DELETE FIELD contents SKIP FIELD (to next or previous field) 

RESTORE FIELD contents SKIP RECORD (to next or previous record). 

• SORTING of records is MACHINE CODE assisted 

200 RECORDS (40 characters) m about 5 SECONDS 

ANY COMBINATION of fields (including numerics) with each field in ascending or 

descending order 

• SELECTION of records for Loading, Updating Deleting Printing and Saving is 
MACHINE CODE assisted 

Specify up to 4 CRITERIA, each using one of 6 RELATIONAL COMPARISONS 

LOAD or SAVE selected records using MULTIPLE FILES. 

Example Select records representing those people who live in the state of Col- 
orado, but not in the city of Denver whose last names begin with "F" 
and whose incomes exceed $9000.00 

Example Select records representing those sales made to XYZ COMPANY that 
exceed $25.00. between the dates 03/ 15 and 04/10 

MAPS III (MTC AIDS PRINT SUBSYSTEM), included at no charge, has the following features: 

• Full AIDS III SELECTION capabilities 

• Prints user specified fields DOWN THE PAGE 

• Prints user-specified fields in titled, columnar REPORT FORMAT, automatically 
generating column headings, paging and (optionally) indentation 

• Can create a single report from MULTIPLE FILES. 

• Prints user defined formats for CUSTOM LABELS, custom forms, etc 

BELOW ARE TESTIMONIALS from owners of AIDS systems These are absolutely authentic 
statements and are typical of the comments we receive 

This program will do more lor my business than all the other programs I 
have, combined. " 

David Wareham. Vice President (EDP). National Hospital and Health Care Services Inc. 

We have 32 different Data Base Management packages for the TRS-80. AIDS III is easily 

the best. It also makes it easier for us to step up to our Model II since the package is 

available for both computers." . . _, .. . n , t Q . ,. . _ 

Jack Bilinski President. 80 Microcomputer Services 

"Your AIDS program is far and away the finest information management system that I've 
ever seen. I am currently using it to maintain a clear picture of the demographic data on all 
the kids in our residential treatment program and it is working for me superbly." 

Frank Boehm. Director Front Door Residential Treatment Program 

• COMPATIBLE with AIDS-II data files and AIDS subsystems 

• Move up from AIDS II and EXPAND to 20 field capability WITHOUT REENTERING 
DATA 

• AIDS If (Model I or II) owners may UPGRADE FOR ONLY $25.00 

•WARNING 1 Th s program is written in BASIC and can be listed in the normal manner 
Modification of program code is NOT RECOMMENDED Cue to its extreme complexity 



mTc-SHIRTS 

HIGH QUALITY. POLY COTTON 

BLEND T-SHIRTS. White with Navy Blue 
nech and sleeve ringers ". MTC logo on sleeve. 
Top quality transfers of your choice on Iront 

Specify size (S..M..L..XL ) and Transfer: 

• META TECHNOLOGIES MAKES EVERY BYTE 
COUNT' 

• DON'T TOUCH MY BITS! 

01 I I I I 10 

• RAM it! 

• MICRO LOVERS TAKE SMALLER BYTES! 

mTc-SHIRTS $5.95 



MAILSORT(Model I) $19.95 

MAILSORT replaces existing sort in Radio Shack 
Disk Mailing List" system Sort by any combina- 
tion of fields, such as NAME, within CITY, within 
STATE Hi speed in memory routine sorts 300 
records in approximately 60 seconds Minimum 
32K recommended For use with old or new ver 
sions 



PEEK&POKE $14.95 

Frustrated because PEEK and POKE have been 
removed from Model II BASIC? Satisfy your 
curiosity with PEEK&POKE from MTC Included 
are 8- bit and 16 bit (LSB MSB) self relocating 
machine language routines, instructions, and demo 
program. 



MTC AIDS II 

Ailing information? Doctor it up with AIDS-II. This 
Automated Information Directory System is user- 
defined features user-specified fields and 
prmf display formats, conditional record selection, 
updating of fields within records, sorting by any 
combination of fwWs. and much more! Unique 
"windowing'' capability allows directories of 
unlimited size Window size is typically 200 or more 
records in 32K. Can be used for mailing lists, client 
reference reporting appointment calendars ". in 
ventory records and other information systems. 
Easy to use. Defining a system takes about a 
minute Formatting a report or defining a custom 
label, less than 30 seconds Sorting 200 records 
takes less than 5 seconds. Add "subsystems' for 
additional capabilities 

MTC AIDS-II $49.95 

For Model II $79 95 



CALCULATION SUBSYSTEM (CALCS) 

Use for report generation involving basic manipula 
bon of numeric data such as quantity & cost com 
potations balances carried forward and columnar 
totals Expands capabilities with respect to tnven 
tory, accounting and other numeric based informa- 
tion systems 

MTC CALCS $24.95 

For Model II $39.95 



MAILING/INFORMATION LIST 
SUBSYSTEM (MAILS) 

Use tor report & label generation involving for 
matting of primarily non numeric data, such as 
custom, "N up' and "N-copy" label forms, 
index-type report formatting, and trimmed field 
capabilities for selection & print Expands AIDS 
II with respect to client product reference 
systems, mailing lists and other non numeric in 
formation systems 

MTC MAILS $24.95 

For Model II $39.95 



RECORD/FILE ORGANIZATION 
EXECUTIVE (REFORGE) 

Use for expanding, contracting or reformatting 
AIDS-II files. Convert random & sequential files to 
AIDS-II format- Use for converting mailing lists to 
AIDS-II Includes MERGE* PURGE capabilities lor 
combining smaller files into larger ones and remov- 

3; duplicate records. 
TC REFORGE $24.95 

For Model II $39 95 



Transfer PROGRAMS and DATA 
from MODEL I to MODEL II 

TRAN-SEND 



< 



$49 95 



by MTC 



Requires MODEL II and MODEL I with disk & 
RS-232 Simple to use, not a kit nothing else to 
buy Complete with custom cable. SW" & 8" flop- 
pies, instructions May be used over phone lines. 

Custom Cable only $19 95 

>uitabie fa list *iin Radio SfeKk' translei piogiamACI 0131) 
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MAKES EVERY BYTE COUNT 

IN YOUR TRS-80 MODEL I OR MODEL II DISK SYSTEM 



PROGRAMMING 
TOOLS 



TDAM $19.95 

For Model II $29.95 

Includes MTC QUE Card! 

Having trouble with RANDOM FILES? With MTCs 
Table Driven Access Method (TDAM) you'll never 
fret over FIELDing again. No knowledge of 
random access files is required. Insert the TDAM 
"interpreter" into any BASIC program and type in 
a few DATA statements describing the information 
in your files TDAM does the rest! Reads and 
writes fields and records of any type (even com 
presses a DATE field into 3 bytes!). Features 
automatic file buffer allocation, deallocation, 
memory buffering, sub-record blocking/de- 
blocking, and handles up to 255 fields per record. 
Super fast and super simple! Complete with 
TDAM interpreter, instructions and demo pro- 
gram. 



T 






Buy 4 get 1 FRFF 
Any 5, $79.80 ,mi -^ 

For Model II $119.80 

SIFTER $19.95 

For Model II $29.95 

Twelve in-memory high-speed sorts for use in any 
BASIC program: stable, nonstable, with/without 
tags, for numeric or string data. Random File 
Sort included. Some sorts written in machine 
code. Includes sort subroutines, demo programs 
and instructions Relocate as needed with 
REBUILD. 



DIVERGE $19.95 

For Model II $29.95 

Compares two BASIC program files, showing the 
differences between them Identifies & lists lines 
which have been inserted, deleted. & replaced 
Use for version control. 



REBUILD $19.95 

For Model II $29.95 

Reorganize programs for adding program code. 
faster execution, readability Much more than sim- 
ple renumbering Rearrange group s o f statement s 
within a program - automatically updates 
references to line numbers. Use with 
SUPERSEDE and MINGLE for maximum effect 



^ 



MTC TECH B.S. 

Our exclusive Technical Bulletin Service reveals 
the inside story on the TRS-80' I & II Sent by first 
class mail, bulletins are issued as the news breaks, 
not |ust once a month. Expensive, but worth it! No 
advertising or flyers, just pure Technical B. S! 
Cancel any time unused balance refunded Free 
year -end subject index with 12-month subscrip- 
tion Subjects have included PEEK&POKE func- 
tions for Model II". "Machine Language Sort for 
String Arrays'. "Tandy Marketing Plans", and 
"Level II Memory Locations" Subscriptions may 
be back-dated to obtain previous Bulletins 

1-Year Subscription 

(Includes free index) $36.00 

Monthly Subscription $3.00/mo. 



SHRINK $19.95 

For Model II $29.95 

Makes Every Byte Count!. Make programs 
smaller and faster! Combines lines & removes un- 
necessary code including remarks, without alter- 
ing program operation. Typically reduces pro- 
gram size 25% to 40%. 

SUPERSEDE $19.95 

For Model II $29.95 

A "must have" for the professional programmer 
or the serious amateur. Probably one of the 
greatest time savers available Write programs in 
shorthand change variable names generate 
ogram documentation • use with REBUILD and 
INGLE to build new programs from old ones. 



MINGLE $19.95 

For Model II $29.95 

Merge up to 14 tiles (Program or Data) into a 
single file Data files may be merged in ascending 
or descending sequence with the ordering based 
on a user-specified comparison field A very nan 
dy utility for consolidating data files. 



Single sided. Single density. Soft sectored 

DISKETTES 

Verbatim 5 ' 4-inch 

*¥£-*+ Box of 10 

Quantity 10 Boxes $23.50 

Hard sectored (10-hole). Box of 10 S26.95 

8 inch FLOPPIES 

Single-density. Box of 10 $29.95 

Double-density, Box of 10 $39.95 

PLASTIC LIBRARY CASES 
5-4 inch or 8-inch diskette case $3.00 

FACTORY FRESH. ABSOLUTELY FIRST QUALITY 
Minimum order 1 box. NO order limit! 



Complete for Model I with all utilities 
Plus exclusive MTC QUE card! 



NEWDOS +11 

$99 



95 by Apparat 
and MTC 



40 TRACK VERSION $ 109.95 

includes REF. RENUM. SUPERZAP 
EDITORASSEM DISASSEM DIRCHECK, and 
more! This is the original NEWDOS with all of Ap 
parat's utility programs, plus any 2 MTC PROGRAM 
MING TOOLS (for Model I), of your choice Includes 
exclusive MTC QUE (Quick User Education) card. 
MTC QUE Card only $1.50 



Let your TRS-80 Teach You 

ASSEMBLY 
LANGUAGE 

REMSOFTs unique package, "INTRODUCTION 
TO TRS-80' ASSEMBLY PROGRAMMING" in 
eludes ten 45 minute lessons on audio cassettes, a 
display program for each lesson providing illustra- 
tion & reinforcement, and a text book on TRS-80" 
Assembly Language Programming. Includes use- 
ful routines to access keyboard, video, printer and 
ROM Requires 16K Level II. Model I. 

REMASSEM-1 $69.95 



* 



* 






The perfect supplement for your 
NEWDOS +, from IJG, Inc. 

"TRS-80 DISK AND 
OTHER MYSTERIES" 

by Harvard C. Pennington 

132 pages written in PLAIN ENGLISH packed with 
HOW TO information with details, examples and in 
depth explanations Recover lost files and direc 
tones, remove file protection, make BASIC pro 
grams unlistable How to use SUPERZAP, recover 
from DOS errors and MORE! 

TRS-80 DISK $22.50 



All products 

guaranteed for 

replacement only. 

Prices, Specifications & 

Offerings subject to 
change without notice. 
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MOST ORDERS 

SHIPPED 

WITHIN ONE 

BUSINESS DAY 



QUANTITY 

DISCOUNT 

INQUIRIES 

INVITED 



WE ACCEPT 

• VISA 

• MASTER CHARGE 

• CHECKS 

• MONEY ORDERS 

• COD. 



Add $2.50 for 

shipping & 

handling 

S2 00 EXTRA 

for COD 

Ohio residents 

add 5':% sales tax 




TO ORDER CALL TOLL FREE 

1-800-321-3552 

IN OHIO call (216)289-7500 (COLLECT) 



••20 



IYIeta Technqlqgies Corpora™ 

26111 Brush Avenue, Euclid. Ohio 44132 
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%0 REMARKS 

%r^0 bv Wavne Green 



"As the size of the 

magazine increases, so does 

the postage involved in sending 

it to the subscribers. " 



My editorial on electronic mail brought 
.quite a bit of response. To my knowl- 
edge there are at least three firms designing 
Electronic Mail Boxes (EMB), a unit that will 
plug into both your computer and your tele- 
phone. 

Some questions have been raised about my 
proposal. First, 1 suggested EMB's use 1200 
baud because I felt the currently used 300 baud 
was far too slow. It should be possible to con- 
nect and transfer a one page message all within 
one minute . . . and that requires at least 1200 
baud. 

Suggests 9600 

A letter from Art Brothers, who runs a small 
phone company out in Utah, suggests we think 
in faster terms. He claims that it is possible to 
jam 9600 baud over a phone line using com- 
pression and expansion techniques. Undoubt- 
edly a lot of you readers are far more experi- 
enced with this than I, so we need some articles 
on the subject. A 9600 baud system which 
would work over any conceivable phone con- 
nection over long distance lines with 100 per- 
cent transfer of a message would be wonderful. 
If this is even remotely possible, we should 
work for it right now and not be forced to 
change standards in a year or two. 

We also need to establish protocols for 
signaling over the lines. Then, we need a hand- 
shake protocol to initiate the transfer of the 
message and a protocol to assure that the mes- 
sage has been received 100 percent error free. 
We can use error correcting codes for this to 
some advantage, but we will still need a system 
for checking the received copy . . . and ac- 
knowledging it's receipt. 

One suggestion is that the EMB automatical- 
ly forward a received message, if desired. Per- 
haps we could get a dump of waiting messages 
from any remote terminal. Even if the first 
systems do not have these features, I think they 
will be along soon enough. 

Received messages will have to be stored on 
tape or disk automatically, so that the system 
will be ready for the next message. And the 
software must be flexible enough that you can 
be writing messages to be sent at the same time 
as the system is receiving one. 

Would we want a duplex switch on the sys- 
tem for immediate two-way communications 
similar to a Telex? Why not? A special signal 
might indicate that the recipient of the message 
is on the line for immediate answer. 

The software should include a word pro- 
cessor so we can write our messages on the tube 
and edit them. It does not have to have all of the 
sophistication of a full fledged word processor, 
complete with paragraph movers and key word 



finders. If it does just a little better than a 
Teletype machine, it will be fine for this. 

If there is enough interest in this, I will be 
glad to organize a symposium for individuals 
and firms interested in exchanging information 
so that we may standardize protocols. I think 
that between 80 Microcomputing and Kilobaud 
Microcomputing I ma\ have enough clout to 
make sure that the best system becomes a stan- 
dard. 

I believe that Radio Shack will be selling on 
the order of half a million computers this year 
and I will be disappointed if at least 75 percent 
of those buyers do not get an EMB to go with 
their system. 

Research Done 

In order to get this project moving, we first 
have to do the research and development. This 
means that the ball is in the air. Most of the 
technical development has been done and the 
results published in one or more magazines. 

Cover Photos 

Would you like the prestige of getting a 
photo on the 80 Microcomputing cover? 

Subject? Generally we like to have some 
photo which shows the TRS-80 — either model 
— in use . . . hopefully with some interested 
people around. 

Submissions will do best if they are larger 
than 35mm. We prefer the 6x7 cm or larger 
format, so we will have clear and sharp cover 
pictures. 

Photographers should keep their eyes open 
for interesting applications of the Tandy com- 
puter system. Radio Shack stores are not ex- 
empt from the competition and a credit line on 
the photo will not hurt business one bit. 

Oh, I almost forgot ... we pay up to $100 
for cover photos. 

The Price Goes Up 

When a publisher starts a new magazine, it is 
always a gamble. Of course I try to keep the 
gamble to a minimum by knowing my trade 
better than most people. I've gotten rather 
good at starting new magazines and having 
them succeed, right from the first issue. In 1975 
it was Byte, in 1977 it was Kilobaud Microcom- 
puting and now, 80. 

As the size of the magazine increases, so does 
the postage involved in sending it to the sub- 
scribers or in shipping copies to the newsstands. 
That is why cover prices and subscription prices 
tend to go up. Of course inflation makes mat- 



ters even worse. In order to be sure that 80 got a 
good start I set the cover price and subscription 
rate much lower than normal for a technical 
magazine of its quality. There are several 
higher priced magazines with a lot less in- 
teresting material on the market. 

Starting with the July issue the cover price of 
80 will be $2.50 and the subscription rate within 
the U.S. will be $18 per year. A three year sub- 
scription is currently only $40. This will be go- 
ing up to $45 with the July issue. 

If you follow the normal pattern of procras- 
tination, you'll do me a big favor and pay the 
higher price. In order to "save money" you'll 
buy at the one year rate and we'll do even bet- 
ter. 1 expect the cover price to go up again, pos- 
sibly by the end of this year, to $2.95, with the 
subscription rate going to $25 for one year and 
$53 for three years. Why not wait and see for 
yourself? 



See You in Hong Kong 

You have always wanted to go to Asia, but 
you just haven't had the proper push to get you 
going. I'm pushing ... so get out your check- 
book and enjoy the ride. 

Last fall I went on an IEEE sponsored tour 
of the Far East and had a fantastic time. The 
tour is running again and you'll want to come 
along and see Asia, it will be from October 2- 
22nd and the cost is just over $2,000 each, a 
wonderful bargain. That includes all plane 
fares, buses, hotels, banquets and sightseeing 
trips. 

Quite a few microcomputer addicts and in- 
dustry people make this trip, so it will be much 
more fun than going with undertakers or pipe- 
fitters. The trip coincides with consumer elec- 
tronic shows in Tokyo, Taipei, Seoul and Hong 
Kong. Unless you are made of sterner stuff, 
you will find yourself getting enthused over im- 
porting some of the electronic and computer 
equipment that smaller Asian firms are mak- 
ing. 

Or you may want to take advantage of the 
low cost production facilities for some product 
you are making or would like to make. 

We'll plan on getting together with the presi- 
dent of the Hong Kong TRS-80 club, which had 
over 300 members last year. We'll also visit 
Akihabara in Tokyo, a section of town with 
hundreds of electronic stores. 

If you're interested, drop me a line and ask 
for further information. I think we'll try for 
two tables of computerists — that's about 24 of 
us — so don't procrastinate. The address is: 
Asia Tour, c/o 80 Microcomputing, Peter- 
borough, NH 03458 ■ 
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ow's your 
love life? 



» 



A little dull around the ed< 

Routine? Predictable? Boring? Maybe 

all it needs is a little Interlude. Interlude is 

the most stimulating computer game ever conceived 

It comb: >mputer interview, an innovative 

programming concept, and a one-of a-kind manual to 

turn your love life into exciting, adventurous, delicious fun! 




Interlude is: romantic . . . playful . . . outrageous ... a fantasy. Interlude is: ■ Wet fun 

on a hot summer night. (Interlude #21) ■ A surprise on the way home from dinner. (Interlude #42) 

■ A bubble bath that ends with a bang. (Interlude #78) ■ An evening to rest while she does all the 

"work." (Interlude #25) ■ The most romantic of evenings. (Interlude #84) ■ A new twist to an 

old subject (Interlude #69) ■ Just watching her. . . (Interlude #57) ■ An erotic fantasy! (Interlude #33) 

With over 100 Interludes, you can satisfy all levels of interest and desire. Each Interlude is fully 
bed in the manual, and the more elaborate ones are detailed with regard to settings, props, and 
mood-enhancing techniques. But we've saved a few super Interludes for that very special time when your 
Interview indicates you're ready! At that time, you will be introduced — • ^ "-287 

>ne of several Interludes held secret within the computer. (When you 
learn secret Interlude #99, your love life may never be the same again!) 
Interlude can give you experiences you'll never forget. Are you ready for it? The Ultimate Experience , 



Interlude 




Interlude. 10428 Westpark. Houston. Texas 77042 I'm really ready' Rush me copies of Interlude today. 

!l (16K)# □ For the TRS-80 (Level II-16K)## G $14.95 (or cassette n $17.95 for diskette. 
Add $1 .50 for shipping. Texas residents add 6% sales tax. My check (payable to Interlude) is enclosed. □ 
Charge mv. MASTERCHARGF. VISA account. 



Account No. 

All charge customers must sign. 

Name 

Address 
City 



Signature 



Expiration date 



CHARGE CUSTOMERS: Order by phone toll-free! 
# Apple II is a registered trademark of Apple Computers, lnc 



State Zip 

1-800-327-9009 Ext. 306 .n* i-hoo-au -7999 txT.3o 6) 

# # TRS-80 is a registered trademark of Radio Shack, a Tandy Co. 
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4 ' The hate is 

generated by virtually 

everything Tandy does, 

and . . . doesn't do. " 



Past Lives 



Tandy Love — Hate 



I want you to know how much I appreciated 
"The Mind Works Much Like a Computer" 
(Feb. 80). I "flashed" on your suggestion that 
"... the human brain's storage medium is 
both infinite and permanent", with " ... of 
coursel" Somehow I just know that and don't 
know how. 

An area which fascinates me is conscious- 
ness, although a computer could probably du- 
plicate much of our decision, thought and 
analysis process, what would it take to make 
the computer conscious of its thoughts, deci- 
sions and analyses? 

Thank you also for 80 Microcomputing — 
truly tremendous! I've already placed several 
orders and contemplate several more. Thank 
you for your contribution to my life. 

Leo Horowitz 
San Diego CA 



My feeling is that computers will not attain 
consciousness, no matter their complexity. Of 
course, we really don 't know what conscious- 
ness is. We can try to define it as an awareness 
. . . or, in the case of people, an awareness of 
awareness, but this really doesn't help us to 
understand what it is and how it happened. 

With the concept of consciousness we are 
getting into country where scientists are ill at 
ease. When we observe the actions of individual 
cells in our body, there is activity which seems 
to indicate some sort of cellular consciousness. 
Each of these cells is made up of a large number 
of replicating molecules, and, yet, each cell has 
a life of its o wn and an apparent consciousness. 

When we go to the next order of abstraction 
we find that just as the molecules which made 
up the cells took on a life and consciousness of 
the unit, so do the cells which make up our 
bodies take on a consciousness of the unit. Of 
course it is unlikely that the cells, though they 
exhibit consciousness, are aware of the con- 
sciousness of the whole body. 

Now getting back to our unconscious com- 
puter system. I might draw a parallel with a per- 
son, who has consciousness, and a library of in- 
formation, which does not. Adding memory to 
a computer is akin, as I see it, to adding 
volumes to a library. Adding more computa- 
tional circuits would speed the access to the in- 
formation, but somewhere that spark of life is 
missing. We don V have any good explanation 
from religion either — other than attributing the 
whole thing to God. I'll buy that . . . at least 
until we get a better understanding of the mat- 
ter. — Wayne. 



Since your observations are shared by others, 
I thought the readers of 80 Microcomputing 
might be interested in your letter to Mr. Korn- 
feld. One can hope that Radio Shack will em- 
bark on a project to take customer problems to 
heart and work toward eliminating them in the 
future. Shall we drink to that idyllic world? 
— Wayne. 



Mr. Lew Kornfeld, President 
Radio Shack 
Fort Worth, Texas 

Dear Mr. Kornfeld: 

Owning a TRS-80 projects one into a Love- 
Hate relationship with his machine and with 
Radio Shack, which is unaffected by my own- 
ership of one share of Tandy stock obtained in 
the good old days when we shareholders re- 
ceived a ten percent discount. 

The love is generated by the wondrous little 
machine you have placed on my desk. 

The hate is generated by virtually everything 
Tandy does, and what is left over is generated 
by things which Tandy doesn't do. 

I started out small and put my office on the 
Level I cassette payroll. It was fair, but it was a 
nuisance to have to calculate the New Jersey 
state tax by hand each week for each employee, 
with a computer staring me in the face and do- 
ing the much more difficult job of calculating 
the Federal tax. A plea to Fort Worth for help? 
Dumb or arrogant answers, and certainly no 
help. For example, "We can't be expected to 
provided fifty different programs!" (Why not, 
you sell the TRS-80 in fifty different states 
without warning the purchasers that the pro- 
gram won't run automatically?) Why not set up 
state taxes like the Federal, with data lines to be 
changed by the user each year as rates changed? 
No reason, just indifference. Why not make 
documentation available so that the user could 
easily modify the program to his needs? 

Yesterday, ready to move into the world of 
disks and printers, I made an appointment for a 
word processor demonstration at the East 
Hanover, New Jersey Computer Center. The 
appointment was made two days in advance, 
and I asked for assurance that a skilled oper- 
ator of the system would be available to dem- 
onstrate it (having been previously advised by 
this center to call first for this demonstration). 
So, I left my practice for the morning, drove 
forty-five minutes, arrived at the appointed 
hour, and was pleasantly seated at the machine 



by a chain-smoking store manager, who was 
able to load the diskette, call up "SCRIP- 
SIT/LC" and list "HIPPO/LC", and then sat 
helplessly before the screen, manual in hand, 
unable to demonstrate even a single editing 
function. The demonstrator had gone out to in- 
stall a system! 

I have purchased a number of excellent pro- 
grams, all from other sources; REMODEL, 
PROLOAD, T-SHORT, LEVEL I IN LEVEL 
II, Z-CHESS, DUNJONQUEST and a pack- 
age of programs from TBS. All of these have 
been excellent, and have enhanced my use and 
enjoyment of the computer. 

Radio Shack sells inferior programs, gives 
terrible software support, provides an 800 
"hot-line" which is almost always busy, and 
which has never been able to answer my rela- 
tively simple and unsophisticated questions, 
has sales personnel who usually know less 
about the computer than anyone who has 
finished the second page of the excellent Level I 
manual (what on earth went wrong with the 
Level II manual?), and puts on media blitzes 
advertising products that will not be available 
for months (how many Daisy Wheel printers 
have made it to the stores yet?). 

The TRS-80 has been made into a huge suc- 
cess in spite of Tandy, and due to the efforts of 
such as Wayne Green and his Kilobaud and 80 
Microcomputing publications, and by com- 
panies such as Racet, Microsoft, Apparat, 
Houston Micro-Computer Technologies, and 
others who have supported your system with 
good programs, good peripherals, good arti- 
cles, good fixes for your problems, sympathy, 
understanding, a willingness and an ability to 
help their customers, and, in point of fact, pro- 
vide what Radio Shack should, but can't or 
won't provide. 

They deserve your encouragement and sup- 
port. Three TRS-80' s have been purchased by 
friends and associates of mine, seeing my en- 
thusiasm. Had it not been for the availability of 
outside support, that enthusiasm would not 
have existed, and those three individuals would 
not have become customers. Multiply that by 
the number of units out, and you will perhaps 
become appreciative of the need for continuing 
support of those who support you. 

Robert A. Goldstone, M.D., P.A. 
Paterson, NJ 



Disk Primer Update 



Having just received the March issue and no- 
ticing Mr. Kenderdine's comments on my arti- 
cle, "A Disk Primer," I thought I should put a 
quick note in the mail. 



10 • 80 Microcomputing, June 1980 



In as much as I dislike letters that begin "In 
Response . ..." let me say that I agree with 
Jim a full SO percent. 

CMD"T and CMD"R work well on BASIC 
tapes, but system tapes, designed for the typical 
Level II, 16K configuration, as most are, load 
either over, under but almost always through 
DOS, forcing a reboot. 

Perhaps I should have said "... Level 11 
SYSTEM tapes arc not compatible . . . "; it's 
just a quirk of mine that mentally blocks the 
fact that there are tapes in BASIC, since the 
bulk of them are games and I have a strong 
aversion to spending $4000 + for a toy to play 
games on. 

As for the deletion of DOS programs to free 
disk space, yes, again he is correct, but the arti- 
cle was meant to be a Primer. When I first got 
my drive, I could hardly wait to start using it, 
but my Expansion Interface kept crashing, 1 
lost a few files and routinely ran the FOR- 
MAT/BACKUP pair. Later on, with DOS 2.3, 
I used the check-out procedures (TEST1/ 
TEST2) just after booting. And BASICR is 
something 1 find difficult to live without. 

The point is, with one drive, inserting, ex- 
tracting, inserting, extracting, ad nauseam, is 
fatiguing, especially after a six or seven hour 
session at the machine. I can see deleting the 
TAPEDISK/CMD and the 3/BAS utilities, but 
I think that brings storage space up to about 48 
or 49K. I have nothing against being creative, 
but a valid and viable disk-based TRS-80 must, 
in my opinion, have two drives. It took me 3 
months to come to that conclusion, after which 
I had to scrape and spend a long time waiting 
for it. 

I think my DOS-mate, Mr. Kenderdine, will 
find this out as he goes along the Disk route. I 
do thank him for the compliment, and for pip- 
ing out some more information, since that is the 
essence of learning. Without personal interac- 
tion, CRT might still stand for Crummy Rock 
Tablet. 



Bill O'Brien 
NYC, NY 



Illegal Victory 



Soon after receiving the March issue of your 
magazine, I approached my machine's key- 
board and entered in William Lopez's Hex- 
pawn game, making slight modifications so 
that it would run on my Level II machine. 
Then, after this long typing session, I started 
the program running. At first all went well— I 
first used the example given in the article, then 
strange things began to happen. I won the first 
round, as was expected, and also the second 
round, but from then on no matter what move I 
opened with, it conceded the game! 

I listed out the program again, and found no 
error this time on my part. I thought maybe it 
was my machine, and so 1 checked its RAM 
with a memory tester, but found nothing. Once 
again I ran the program, only to have it cheat 
time and again (like putting captured men back 
on the board and moving diagonally to empty 
spaces. 

I've gone over my work twice since then, and 



can find no flaw. Was there maybe a misprint 
(or an omission) from the magazine text? 1 pray 
some heartly soul can find what is causing such 
unsportsmanship in my machine. 

Joseph Teller 
Wallham, MA 



Squot's Travels 



I enjoyed the article/program "Ball Box" by 
James D. Lewis in 80 Microcomputing, April 
1980. I modified the listing to enable me to run 
the simulation on my Level II system without 
any problem (POINT(X.Y) returns - 1, if the 
point is set). 

In the process of enhancing the mini-uni- 
verse, I have discovered a heretofore unre- 
ported phenomenon which other Level II users 
might also want to investigate. I have designat- 
ed this effect "Space Wrinkle" (SPRINKLE). 
It may be observed by inserting the following 
line in the Level II version of the program 
(sorry Level I users): 



5125 IFINKEYSO-THENIFRND(2)=l THEN A - -A 
ELSE B = - B 



Once the modified program is running and 
the Squot starts its travels, the SPRINKLE may 
be observed by depressing any keyboard key. 
The investigator will notice a certain degree of 
control which he now has over Squot's travels. 
This control may be invoked benevolently (i.e., 
to help the unfortunate creature to find the 
food) or merely as an experimental tool (i.e., 
"Will Squot ever find that neat slide, if I don't 
help?"). 

I also believe that line 5001 contains an error 
for both Level I and Level II versions. It should 
read: 



5001 Y = RND<48 - 4) + 2 



Jim Cardell 
Bethlehem, PA 



Problem Winker 



In response to the Winking Cursor article on 
page 68 of the January 1 980 issue, I submit the 
following observations: 

I had been working on a program for some 
time and had a requirement for a "Winking 
Cursor". My approach was somewhat more 
lengthy then Mr. Lovy's. Needless to say I was 
impressed and decided to utilize his approach. 
After a few short tests, 1 discovered something 
was amiss. 

The first problem was that on second and 
subsequent string entries Fl$ equals all charac- 
ters that have been input. The solution for (his 
is to null Fl$ upon each call to the subroutine. 
(Example 1 line 1002.) 



The second problem occurred when 1 at- 
tempted to utilize the LEN(S) statement to test 
string length upon return from the subroutine, 
after inputting a string including one or more 
backspaces. It seems that our friend F1S keeps 
track of not only wanted characters but also 
every backspace intended to delete unwanted 
characters. This means that LLN($) will return 
the number of characters wanted plus the num- 
ber of backspaces. My solution to this problem 
was twofold. 

First if Fl$ is null and a backspace is encoun- 
tered we disregard and start over. (Example 1 
line 1009.) Second if F1S is not null and a back- 
space is encountered, we must adjust FI$ string 
length to the desired length by subtracting a 
character for each backspace. (Example 1 line 
1010.) 

T. D. Sylvester 
Atlantic Beach, FL 

Simple APPENDing 

The article in the February 1980 issue by C. 
Gerald on APPENDing programs was interest- 
ing but I think it complicates a rather simple 
procedure. It is possible to APPEND programs 
using CLOAD and a few PEEKs and POKE as 
follows: 

1 . With your first program already entered 
in core PEEK at 16633, 16634. This is a 
pointer to the end of the BASIC program 
and start of variable storage. 

2. Subtract two from the address you get in 
Step 1 as follows: If 16633 is greater than 
one just subtract two from it; if 16633 is 
less than or equal to one, add 254 to it and 
subtract one from the number in 16634. 

3. POKE the resulting numbers into 16548 
and 16549. Do not do anything to 16633 
and 16634. 

4. 16548, 16549 is a pointer to the beginning 
of a BASIC program, normally 17129. 
We have now altered it to point to the end 
of the present program, actually the two 
zero bytes where the next line pointer 
would normally be. 

5. CLOAD your program to be APPEND- 
ed. 

6. At READY, POKE 16548 with 233 and 
16549 with 66. This sets the pointer back 
to 17 129 and you're done. All the pointers 
for variables, etc. will be properly handled 
by CLOAD. 

If you forgot Step 6, the system will only 
know about your APPENDed program and if 
you try a LIST, it will look like you lost your 
original program. Also RUN will only execute 
your APPENDed program. Try it! 

I've used this method many times and it 
works like a charm. 

The article also has a technical error in 
stating (see Table 1) that line numbers take I 
byte followed by a null byte. They actually take 
2 bytes. His examples had line numbers less 
than 256 which leaves the 2nd byte zero. 



M. Winnick 
Piano, TX 



continued on next page 
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$0 DEBUg 



Conflict of Interest 



I have received many calls concerning 
my letter in the April issue about putting 
Sargon II on disk. It is not clear to peo- 
ple that the DOS "DUMP" command 
requires blanks: one after the word 
DUMP and one after the filespec SAR- 
GON2/CMD. Thus the correct syntax 
is: 

DUMP SARGON2/CMD (START = X'8000\ 
END = X' AD 1 9' ,TRA = X' ACFD') 

where the blanks have been emphasized 
for clarity. While it is necessary to have 
one blank in each of the indicated posi- 
tions, it is also important that the rest of 
the command (between the parentheses) 
not have any blanks. 

Many of the owners of this expensive 
program were quite upset that they 
could not run it from disk. I am sur- 
prised that this important fact is not 
mentioned in the ads. Also, subscribers 
to other magazines may be interested to 
know that some have refused to publish 
my technique, citing conflict of interest 
with their advertisers. 

Roxton Baker 
Ellington, CT 



Break Disable 



In my article printed in April 80 Mi- 
crocomputing, "Break Disable" (p. 
128), an error appeared in line 10, the 
beginning of the FOR-NEXT loop. 

The start of the loop is wrong, caus- 
ing the program to be POKEd into the 
wrong place in RAM. Line 10 should 
read: 



10 Cl S:FOR X = .12743 TO 32767 



I irusi this will help your readers 
make the "Break Disable" work. 



Jim Rastin 
London, ONT 



KWICest Index 



In my letter concerning the article I 
authored, KWIC Index, there are three 
errors in the published listing brought to 
my attention by Dr. Ronald Ribler. The 
errors are in lines 1110, 1 160 and a miss- 
ing line 1265. 
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Assembly I isting by Thomas Belt 



The correct lines are: 



1110 IF W<I) = TWTHEN 1190 

(not IF W(l) TTW THEN 1190) 

1160 TC = TCt" "+TW 

(nol TC= -TC+" "♦Tft'l 

1265 TC= "":REM SET TC TO NULL STRING 



When these changes are made the 
program runs as shown. 

I am embarassed over my failure to 
catch these errors and apologize for the 
inconvenience caused you and your 
readers. 

Leslie E. Sparks 
Durham, NC 



BUGged Light Pen 



There appears to be a BUG in pro- 
gram listing 7 on page 42 of the April ar- 
ticle, "Build a Light Pen". The assem- 
bly language program does not work. 
(At least it didn't for me.) 

According to the Radio Shack Level 
II and DOS manuals, a machine lan- 
guage program which is called by the 
USR function will not return a value if 
terminated by a RET instruction. In or- 
der to return the status of the light pen 
(light on or off) the value of the light 
pen must be loaded in the HL register 
and a JP 0A9AH will return this value 
to the USR function in the BASIC pro- 
gram. 

I am by no means an assembly lan- 
guage programmer but I did change the 
program to reflect this requirement. A 
copy of the listing is attached. 

I did construct the light pen and en- 
countered no problems. The pen works 
very well using the BASIC programs 
and with the modification to the ma- 
chine program that also ran. I have used 
the machine program on a Level II sys- 
tem and also a two disk system using the 
NEW DOS + operating system with no 
problems. I substituted a Radio Shack 
photo transistor (part #276-130) for the 
one specified. In all, an excellent article, 
and I think a very useful piece of equip- 
ment. 

Many thanks for such an excellent 
machine. The April issue is about three 
days old and already dog-eared and 
coffee-stained. Also very glad to see the 
start of an assembly language column. 
Thomas J. Bell 
Mickleton, NJ 
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ST80III 

The Ultimate Communications Utility 

The Smart Terminal Communication Package 
from SBSG, Inc., can turn your TRS-80* 
Model I or Model II Microcomputer into a 
very intelligent distribution processor. Easy to 
use commands and a built-in HELP function 
insure successful operation even by the most 
inexperienced personnel. Full user control of all 
communication options insure that whatever 
your communication requirements, ST80 III 
can provide for them. We'll get you there. 

ST80 III can test your communication 
hardware and notify you of hardware fault. 
ST80 III can transfer files from memory to 
other computers and process received 
information or store it on disk. ST80 III can 
support prompted or unattended modes of 
operation, or remote control from a host 
computer. ST80 III can take full printer 
control. User definable control tables can be 
used to establish special control functions. User 
definable function keys can also be used. 



SBSG, Inc., provides full user support and 
markets three other ST80 products. Any 
computer with communication capability can 
be accessed by ST80 III via your TRS80. Here 
are those computers SBSG ha^s accessed: 



Harris 7 


Apple 


Dartmouth TS 


Sigma 6 & 7 


Northstar 


Source 


DECsystems 


TRS-80* MOD I 


Micronet 


HP2000 


TRS-80 MOD II 


FORUM-80's 


CDC 


Superbrain 


Tymshare 


Honeywell 


Zenith /Heath 


Comshare 


IBM 370 & 360 


Altos 


Compugraphics 


PDP-11 


GE 


Burroughs 



We'll get you there. 



SMALL BUSINESS SYSTEMS GROUP ^^4 A] 

Main St. & Lowell Road ' 
Dunstable. MA 01827 
"* 1 8 (617)649-9595 



* 



•TRS-80 is a registered trademark of Radio Shack, a division of Tandy Corp 



SO REVIEWS 



lt lVe once received a 

tape with a program on 

one side and Barry Man How's 

Greatest Hits on the other. " 



Acu-Data Tape Digitizer 

Alphanetics Mfg. 
Forestville, CA 
$54.95 

by Chris Brown 
80 Staff 

Ah CLOAD, a much maligned mode. That 
the process works at all is testimony to the 
flexibility of the electronic devices involved. 
Cassette recorders were never really meant to 
handle data, even at slow rates, and micropro- 
cessors wince at the thought of their internal 
timing being upset by wildly gyrating cassette 
tape transport mechanisms. 

Nevertheless, if you persevere, you can often 
actually load a program from tape into a com- 
puter via a cassette recorder. It may take some 
time, but it can be done. If your time (and pa- 
tience) is at a premium however, you should 
consider acquiring an Acu-Data from Alpha- 
netics. 

Data Pulses are Shaped 

The Acu-Data is designed to facilitate 
CLOAD and tape duplication. In essence, it is a 
combination filter, rectifier and pulse shaping 
device. Placed at the recorder output, it condi- 
tions the tape data. Hum and other spurious 
noise is filtered out. Data pulses are then rec- 
tified and shaped to insure that proper pulse 
amplitude and timing is achieved before the 
computer ever sees the pulse train . 

An Acu-Data has been in use at the 80 Micro- 
computing editorial office for six months. 
Quite simply, it works. 

Program tapes of questionable quality often 
accompany article submissions to the maga- 
zine, and loading these gems can be a real epic. 
We once received a tape with a program on one 
side and "Barry Manilow's Greatest Hits" on 
the other. The Acu-Data rarely encounters a 
tape it can't handle (including Barry Mani- 
low's). 

The unit runs on 1 10VAC so batteries are not 
necessary. Other features include an LED to in- 
dicate the presence and amplitude level of data, 
a polarity switch that allows the user to select 
either positive or negative going data pulses (to 
compensate for differences in the head and 
audio circuits or various cassette recorders) and 
a copying digital output jack that allows duping 
of processed program tapes. 

The model we have has an optional switch 
that provides computer control of the recorder. 
This option, especially handy when sequential- 
ly loading data in long programs, costs an extra 
five bucks. 

The most immediate benefit of an Acu-Data 



is that it ends your worries about recorder 
volume settings. The unit produces the proper 
output level under widely varying input condi- 
tions: No more fooling with your kid's Dick 
Tracy Wrist Radio and the recorder volume 
control to get a good load. 

The Acu-Data has proved to be a miracle 
worker when it comes to salvaging marginal 
tapes. 

In addition, lousy originals can generate 
good copies when the copying digital output is 
used for duplicating. 

There are limits to the capabilities of the 
Acu-Data. Generally though, if you could not 
quite load a tape through the Acu-Data, you 
would not have gotten close without it. 

The unit is ruggedly built, enclosed in a 
shielded metal case. The version we have shows 
signs of last minute fixes on the clad side of the 
PC board. The manufacturer assures us that 
they are not present on current production 
models. 

Always On Line 

The Acu-Data is on line whenever it is plug- 
ged into a 1 10VAC outlet. No provision for re- 
moving AC from the primary of the line trans- 
former is made and, consequently, the trans- 
former is forced to dissipate a respectable 
amount of hysteresis generated heat. How this 
constant heat dissipation will effect its service 
life is a good question. So far, it has not af- 
fected the performance of our unit. 

The comprehensive user's manual is clearly 
written and includes many hints on using tapes. 




A schematic and parts list was not available, 
but we did see the warranty. It is impressive. 
Each Acu-Data comes with a ten-day, money 
back guarantee. In addition to a 90 day, uncon- 
ditional warranty on parts and labor, a flat $15 
maximum repair fee is guaranteed on any prob- 
lems encountered within the first 12 months. 

Guarantees like this are rare in the micro- 
computer industry and certainly inspire confi- 
dence. Three cheers for Alphanetics. 

Alphanetics has a winner in the Acu-Data. 
For tape oriented computerists who prefer to 
think in terms of black boxes and have no de- 
sire for breadboard projects, the Acu-Data is a 
worthwhile investment at $54.95. ■ 



TC-8 Cassette System 
JPC Products 
Albuquerque, NM 
Kit: $70 
Assembled: $100 

by Carl A. KoUar 

I guess I don't have to tell any TRS-80 owners 
how frustrating the cassette system that 
comes with the computer can be. Even with the 
factory mod that's available, the annoyance of 
loading and checking programs becomes just 
barely tolerable. 

If you're like me, after you've just plunked 
down a chunk of money for a Level II 16K 
machine, "you ain't got nuttin left" for even 
one disk drive at 500 bucks apiece. So you suf- 
fer. 

A reasonable alternative is the Exatron 
Stringy Floppy (ESF). This will cost you about 



250 bucks and totally eliminates your loading 
and saving problems, automatically and fast. 
I've had one of these for about six months and 
love it! 

But, if the price is still too steep, have 1 got a 
device for you! 

The Device 

The February 1980 issue of Microcomputing 
had an ad that intrigued the hell out of me. It 
was for a high-speed cassette system by JPC 
Products acclaimed as a "poor man's floppy." 
It made all sorts of seemingly ridiculous claims 
such as "loads five times faster," "stores 50,000 
bytes on a 10-minute cassette," "less than one 
bad load in a million bytes with the volume con- 
trol anywhere between one and eight." 

All this for a measly 70 bucks? How could 

this be? A call to Albuquerque answered a few 

questions: Yes, it had its own power supply, 

Continue to page 16 
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TAKE ADVANTAGE OF OUR 

20% OFF 

INTRODUCTORY OFFER! 

Now you can order checks and statements that are guaranteed to work with 
your Radio Shack programs. 
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Standard Radio Shack payroll check 
(Designed for use on TRS-80 TM Model 
I with tractor feed printers 1 or FIJ) 






V* 




/ 
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Standard Radio Shack accounts payable 
check. (Designed for use on TRS-80 TM 
Model I, line I & III printers only. 

Adjustable pin feed printer) 



Standard Radio Shack statement 
(Designed for use on TRS-80 TM Model 
I, line I & III. Adjustable pin feed printer) 



• 

• 

• 
• 


. .- 


• 

: 

• 



Side by side payroll check. (Designed for use on TRS-80 TM 
Model II line III printer only. Adjustable pin feed printer) 



Send For FREE Samples And Brochure Today! 

FREE RUSH DELIVERY of 7 working days available on your initial order. 

Our nationwide, freight-paid service specializes in small minimum orders and fast, 
reliable delivery. Our forms are produced and stocked in-house, so you deal direct 
with the factory. 

Forms also available for Peachtree, Osborne and others. 

TRS-80 and Radio Shack are registered trademarks of the Tandy Corp. 




Checks 
To-Go 



8384 Hercules St. • La Mesa, CA 92041 • (714) 460-4975 
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SO REVIEWS 



From page 14 



and, it stored programs five times faster be- 
cause it utilized higher density data. The com- 
puter outputs the information at a higher rate 
out of the rear keyboard connector. 

The ad had even claimed anyone could build 
it even if you have never soldered before. J PC 
would make it work, if you couldn't — for free. 
I was sold. I placed my order, and it arrived 
about two months later (parts shortage). 

I work in electronics, so I found the unit ex- 
ceptionally easy to build. It took about an 
hour. The manual is superb. (That's better 
than great.) It was clear, concise and exact 
with no ambiguities. Important parts place- 
ments are stressed (polarity markings on elec- 
trolytics, bands on diodes, etc.). 

JPC was right! With these instructions, you 
couldn't go wrong. The board quality is excel- 
lent. It is double-sided and parts locations are 
clearly marked on the component side of the 
board. There are no jumper wires to install. 
JPC utilizes PC traces and plated-through 
holes for connections to traces on the other 
side of the board. 

Also, there are absolutely no adjustments 
or settings to bother with. 

The documentation is a sheaf of %Vi x 11 
papers stapled together. It is written in the 
nicest format I've seen in a while. Each com- 
mand and/or subject is covered on its own 
sheet in large type. All explanations are in easy 
to read English — not computerese. 

Commands and Features 

SAVE"filename": Saves your BASIC pro- 
gram on cassette. 

LOAD: Reads the next BASIC program from 
the cassette. 

LOAD"filename": Searches for and loads 
the specified file from cassette. 
LOAD? and LOAD? "filename": Reads file 
from cassette, and compares contents to mem- 
ory. 

LOADN: Prints a list of all the programs on a 
cassette, until interrupted by the "break" 
key. 

LOADN "filename": Same as above except 
the tape will stop at the end of the program 
named. 

KILL: Removes the file manager program 
from memory so that the extra memory can be 
used by large programs. 
RSET: Allows the operator to rewind and 
position the tape on tape recorders that have 
these functions tied to the motor control jack. 
RUN"filename": TC-8 searches for a spe- 
cified program and runs it immediately. 
PUT" filename": Same as SAVE" filename", 
except it is for use with system tapes. 
GET: Same as LOAD, except it is for use with 
system tapes. 

GET"filename": Same as LOAD"file- 
name", except it is for use with system tapes. 
GET? and GET? "filename": Same as 
LOAD? and LOAD? "filename", except it is 



for use with system tapes. 
GETN and GETN"filename": Same as 
LOADN and LOADN" filename", except it is 
for use with system tapes. 
OPEN: Required before cassette input or out- 
put of a data file can be attempted. 
CLOSE: Required to end a cassette data file. 
PRINT#: Allows numerical or string data to 
be output to a cassette file. 
INPUTff: Allows numerical or string data to 
be input from a cassette file. 

I haven't counted them, so I don't know 
about the "one load in a million bytes" claim, 



but my son, Anthony (age 1 1), loaded about 
30 of his programs from his Radio Shack for- 
mat tape to a new TC-8 format tape. He's run 
them all and found no bad loads. 

Unlike the standard tape system, you can 
position your tape anywhere before the pro- 
gram you want and not have to look for a blank 
spot between programs. The TC-8 patiently 
waits for the program you want and then starts 
loading without getting confused by the por- 
tion of the previous program you just fed it. 

Try that on your regular cassette system; 
you'll wear out the reset button. B 



MAYDAY + S 

Uninterruptable Power Supply 
Sun-Research, Inc. 
New Durham, NH 
$325 

by Chris Brown 

Mayday, the international signal of dis- 
tress, is not likely to be the first word 
uttered by a computerist when the power fails 
in the middle of a lengthy program. Person- 
ally, I can think of many more satisfying ex- 
pletives, but Mayday may be more appropri- 
ate. It is the trade name for an uninterruptable 
power supply, designed to end power line 
problems. 

Emergency Power 

Mayday is a fail-safe device which, in the 
event of a drop in line voltage, provides emer- 
gency power to a microcomputer system. 
Once on emergency power, you can terminate 
the system in an orderly fashion with no pro- 
gram crash or loss of data. Emergency opera- 
tion time varies with the Mayday model and 
the size of your system, that is, how many disk 
drives you own. The Mayday + S can generate 
up to 30 minutes of emergency power. 

Sun-Research, Inc. is a new manufacturing 
and marketing venture launched by Phase-R 
Corporation, a diversified New Durham elec- 
tronics firm. Among its products are laser 
devices manufactured for the medical field 
and the government. 

The original Mayday unit was created to 
meet Phase-R' s need for a reliable, isolated 
power source for the office TRS-80. The com- 
pany's rural location resulted in frequent 
power outages, and the TRS-80' s close prox- 
imity to heavy machinery made it difficult for 
it to run without glitches. After a few monthly 
payroll records were lost, the Mayday was 
born. 

Not only does the unit provide instant back- 
up power, it also isolates the computer from 
spikes and transient voltage surges on the AC 
line. 

The Mayday uses a modified, 120 Hz, 
square wave generator as a DC to AC con- 
verter. When power fails, this generator sup- 
plies power from a 12-volt battery to the com- 
puter. A specially designed isolation trans- 
former allows the Mayday to maintain, plus 



or minus, five percent required computer 
power during switch-over to internal power. 
Plus or minus one-half percent is maintained 
thereafter. Switch-over time is on the order of 
five milliseconds, so no loss of memory oc- 
curs. 

A 12-volt automotive battery (available 
separately) is used in conjunction with the 
Mayday and is enclosed in a high impact 
plastic case. A built-in trickle charger keeps 
the battery voltage within accepted limits. 

The computer monitor, interface, keyboard 
and peripherals plug into a bank of outlets on 
Mayday's front panel. The entire system is 
controlled by one circuit breaker, while an 
idiot light indicates system status. A very con- 
venient layout. 

Line Surge Protector 

Most versions of the Mayday incorporate 
an MDS line surge protector. If your com- 
puter operates in an electrically noisy en- 
vironment, this option is a must. 

If its operation in our office is any indi- 
cation, Sun-Research has met its design goals 
with the Mayday. The 80 editorial offices 
share building space with a printshop and 
darkroom, and the AC line that our computer 
runs on is subject to large voltage swings and 
noise. The constant shrinking of our video as 
presses came on line was a real source of 
worry. 

Once the Mayday + S was installed, the 
shrinking video was eliminated. Now, the oc- 
casional excursions of the line below normal 
levels result in a smooth transition to 
emergency power rather than a catastrophic 
program crash. 

One drawback of our Mayday + S is its in- 
ability to power the 60 Hz AC fan motors used 
in our disk unit and printer. This can be over- 
come by wiring these motors directly to an ex- 
ternal AC source. To alleviate this problem, 
Sun-Research has developed a Mayday unit 
that supplies a 60 Hz sine wave source of 
voltage. This new Mayday is suitable for use 
with Model II machines. 

As the air conditioning season approaches 
and brown-outs become more frequent in met- 
ropolitan areas, the computer chaos caused by 
erratic AC lines will increase. A Mayday unit 
can be your first line of defense against system 
glitches. Now, if you can only get your TRS- 
DOS squared away . . . . ■ 
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For Your 



TRS- 

80 

DUAL DISK-32K 
BUSINESS SYSTEM 



QUALITY 

DTI 
PAYROLL 

No. 410 

DATA TRAIN'S many years 
of small business computer 
experience in accounting pro- 
gram products brings to your 
business all of the quality fea- 
tures, functions, screen dis- 
plays, standard reports, user 
designed reports and operator 
reference manuals; allowing 
you to efficiently manage the 
payroll of your company. 

• 50 employees per mini-disk. 

• Runs in all states. 

• You maintain the P/R pro- 
duct without programing. 

• Flexible, easy to use. 

• No maintenence fees. 



$235. 

Product Info & 
License /Order 
Form. 




PHONE 

(503)476-1467. 

840 N.W. 6th STREET. SUITE 3 
GRANTS PASS: OREGON 97526 

Available Soon- 

• General Ledger Accounting 

• Accounts Payable 

• Accounts Receivable 

• Fixed Asset Accounting 

*Trademark Radio Shack, Div Tandy Coip. 



Inc. 
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Still the Best Place to Shop... 



Still the Best DOS for your 

NEW DOCUMENTATION JUS 80! 

that will make your TRS-80 

(Dealer and Club Discounts Available) ** ^"" ^ A L I V t . 

+ + + CHECK THESE PRICES + + + 



TRS-80 SOFTWARE 

MOD I 

DOS 3.0(New Documentation) $ 65.00 

Documentation Onlv $ 10.00 

Level III Basic $ 45.00 

Editor/Assembler (Cassette-Level II 16K) $ 27.00 

Fortran $ 90.00 

Assembly Language $ 90.00 

CP/M $140.00 

C Basic $ 90.00 

Adventure (diskette) $ 25.00 

UCSD Pascal (CP/M) $295.00 

MOD II 

General Ledger (1200accts.) $495.00 

Inventory Control $595.00 



OTHER SOFTWARE 

North Star (Assembler/Disassembler) 
Runs like Basic, great for learning. 
Basic 80 / Basic Compiler / Fortran 80 
Cobol-80 / Edit 80 / Micro 80 Assembler 
Micro 86 Cross Assembler. 

DISCOUNT PRICE 



Add 2% to pneej ovtr $300 (or charge 
cards. Personal checks require 14 days 
to clear. No colltct calls. All Hardware 
warranted for 90 days. Software 
guaranteed for replacement only. 
Prices subject to change. 




PHONE ORDERS 

615/242-3494 



Call information for TOLL FREE NUMBER 



TRS-80 HARDWARE 

TRS^O Level I 4k $495.00 

TRS-80 Level II 4k $625.00 

TRS-80 Level II 16k w/kp $760 00 

Expansion Interface $275.00 

Lobo Interface (handles 5", 8" and 

hard disks, includes DOS) $495.00 

200 NS Memory (Lifetime guarantee) . . $100.00 

Dual density Module for TRS-80 $230.00 

(Makes all drives Dual Density easy to install) 

TRS-80 Mod II, 32k 53,195.00 

TRS-80 Mod II, 64k $3,695.00 

TRS-80 L Printer III $1,850.00 

MOD II 1st Disk $1,050.00 

MOD II 3 Disks $2,200.00 



OTHER HARDWARE 

Dynabyte Dual Density/sided 

8" System $6,400.00 

(includes CP/M 30 days) 

Apple II. 16k $1,095.00 

Pertec Disk Drive FD-200 (Flippy) . . $370.00 

MPI Disk Drive $370.00 

Cables for Drives-4 Slot $ 30.00 

CAT Modems $185.00 

OKIDATA MacroLine 80 Printer 

80 cps, pin or roller-graphics $850.00 

Paper Tiger, 2k buffer, graphics. . . . $1,100.00 
Microtec Printer 2K, 120CPS, parallel $795.00 

Bidirectional (add SI 00 for Serial) 

MPI 88T Printer, 2k $825.00 

(hull control. 100 cps, variable width) 

Printer Cables (specify) $ 35.00 

- Other Printers and CRT Units available - 



Send Check or Money Order to: 

!llll|lili!l 
I III II 111 

625 Main Street 
Nashville, TN 37206 



Quan. 



Description 



Unit Price Total 



CARD NO . 
EXP DATE 

Name 



HANDLING CHARGE $2.00 

TOTAL 

Tenn. Res. add 6% Sales Tax 



Address 
City 



State 



Z.p 
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' Reader Service — see page 162 




TRS-80 Disassembled Handbook 
Robert Richardson 
Richcraft Engineering Ltd. 
Chautauqua, NY 
$10 Vol. 1, $15 Vol. II 

by Dennis Bathory Kitsz 

The programmer's afterworld is destined to 
offer three options: a heaven of powerful, 
high-level languages; a hell of detailed machine 
code; and a purgatory, where everyone uses 
Richcraft Engineering's TRS-80 Disassembled 
Handbook. 

The handbook's premise is that once a user 
has struggled (resentfully, no doubt) through 
machine code, "it is ridiculous to 're-invent the 
wheel' . . . when these routines already exist in 
Level II ROM." Much of this premise is sound, 
and author Richardson, with more than a few 
questionable generalizations about the primacy 
of his book and the ease of his method, takes 
the reader step by step through the many useful 
subroutines available in Microsoft's BASIC. 

Hurrah for the Evangelist 

For once we may say, "Hurrah for the evan- 
gelist of the short-cut," for Richardson does in- 
sist that knowing machine language well is 
prerequisite to using these subroutines effec- 
tively. Indeed, a technique that dips into the 
netherworld of another person's code can be 
disastrous and misleading for a novice, but 
perfectly valid for an experienced machine 
language program author, who does not care to 
expend either the time or the memory necessary 
to write, for example, double-precision decimal 
arithmetic. 

The available options for a user-programmer 
are, of course, inevitably slow BASIC; assem- 
bly language coding; compilers such as BASEX 
or FORTH; or a combinational method such as 
the handbook suggests. The compilers are 
generally straightforward, but cannot efficient- 
ly co-exist with resident programs. Where a 
TRS-80 must fill a variety of needs, machine 
language programs easily accessible through a 
SYSTEM or USR(X) command are most 
desirable. 

Richardson's technique stands out as singu- 
larly effective, because most of the speed of 
original machine language software is main- 



tained, and memory is conserved through 
generous use of calls to Level II ROM. 

On the other hand, much of Richardson's 
proselytizing is overbearing and self-righteous, 
and often useful points are obscured by his 
tone. A bit overeager in self-appreciation, the 
author states that his work is the first revelation 
of the inner workings of the Level II ROM, 
when in fact, TRS-80 Supermap, published by 
Fuller Software, exposed and annotated the 
ROM's contents six months before the appear- 
ance of Richardson's book. 

Even worse, the organization of the book is 
weak, and the continuous cross-pollution of 
hexadecimal and decimal references further 
blurs the operations of a code still based on the 
octal language of the 8080 archetype. Finally, 
one is forced to question the value of 16 pages 
of the 70-page handbook dedicated to a hex 
listing of Level II ROM. Since none of it is dis- 
assembled, the user cannot learn how registers 
and memory are employed. 

Plenty of Oratory 

In short, Richardson does not help us learn; 
he presents a technique, some examples of its 
use, and plenty of oratory. A sample: "Only a 
retarded 3rd grader would overlook them (the 
BASIC names) in memory locations 5712 



through 6172." 

And one more: "Let us be kind, though, and 
presume that Radio Shack had not the slightest 
idea what Level II ROM contained, and if they 
did, had not the slightest idea on how to find it 
and use it. If such is not the case, they surely 
stand guilty of gross negligence and malice 
aforethought . . . ." 

Fortunately, the handbook's techniques are 
significantly more space-efficient than the 
author's writing. 

Now to the question: As microcomputer 
users, we have been overwhelmed with soft- 
ware and printed matter which seems priced far 
above its worth. By comparison with other 
fields, we pay an enormous amount for com- 
panion products for our machines. Is the 
TRS-80 Disassembled Handbook worth its 
cover price? Perhaps. 

For less than $20 the TRS-80 Supermap 
comes with a detailed annotation of the opera- 
tion of Level II ROM subroutines. That and 
Richardson's book, plus Editor/ Assembler, 
T-BUG and the Z-80 Technical Manual, return 
no change from a hundred-dollar bill. Togeth- 
er, they are a powerful resource. But on its own 
TRS-80 Disassembled Handbook provides on- 
ly a modest return in exchange for your in- 
vestment. ■ 



Adventure 

by Gordon l^etwin 

Softwin Associates 

Microsoft 

Beilevue, CA 

$30.00 

by John Warren 

Having been introduced to Adventure on a 
Burroughs 6802, 1 just couldn't get ex- 
cited about the many mini-adventures written 
for home computers. However, Gordon Let- 
win of Softwin Associates has produced a rip- 
snorter that is almost indistinguishable from 
the original. 

A player explores a giant cave, finds trea- 
sures and battles knife- wielding dwarves. The 
computer is directed with one an two-word 
commands like "get axe" or "north" (go 
north). Part of the fun is finding out what com- 
mands the computer accepts and when it ac- 
cepts them. Adventure is not a game that some- 
one learns in a few minutes, plays in half an 
hour and forgets in a week. 

In a mainframe environment, experienced 
adventurers assist (and tantalize) novices with 
hints. "So the dragon has got you stuck. He 
isn't any problem if you're tough. Come on 
now — what would Conan do in this situation?" 
To overcome the micro-user's isolation, Soft- 
win has prepared a series of four hint books 
and is selling them for a buck apiece (4 for $3). 

The game runs on a 32K, single disk TRS-80. 
To say that it uses the disk is an understate- 
ment. Almost every move causes a quick 
search. However, the delay is insignifi- 
cant—rarely over a second. Playing a main- 
frame over a 300 baud line is much more frus- 
trating. 




The specially designed DOS seems to occupy 
only one sector, leaving the rest free for pro- 
gram and data. Software filchers are going to 
be tearing their hair out on this one, since there 
is no "copy" utility and data is disguised by a 
sophisticated bit shifting routine. Unfortunate- 
ly, this also means there is no way to make a 
backup. Microsoft recognizes this and offers a 
one-year replacement warranty. 

Because of the lengthy playing time (several 
hours), a "save" feature allows players to sus- 
pend the game for later resumption. 

The game is attractively packaged and comes 
with a clearly written instruction book. Clearly, 
both the $30 price tag and the extensive hard- 
ware necessary are going to limit sales, but this 
is an exceptionally entertaining game, and if the 
fanaticism of the mainframe adventure addicts 
is any indication, it should enjoy a steady in- 
crease in popularity. ■ 
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TRS-80* OWNERS: 

• Let the computer write your "Basic" programs for you! 

• Draw pictures, animated figures, data forms! 

• Create a library of displays! 

• Produce "Commercial" grade software! * 



Beginner 




The Magic Cursor is a Revolutionary Family of Products which 
provides a dramatic new method of reproducing drawings and 
displays that you create on your screen. It makes both simple 
displays and complex interactive data input forms. It stores a "BASIC 
PROGRAM" on disk (or tape) ready for you to execute alone or as a 
subroutine. It produces screens in both standard and wide screen. 

It is available for any level 2, 1 6K or larger system with tape or disk. 
An optional version is now available which creates an assembly 
language program. 

Be sure to pick out the system that fits your present needs and 
order it today. You may upgrade your original copy by paying the 
difference and a moderate service charge. 

MAGIC CURSOR PROGRAMS 

THE BABY CURSOR allows you to easily create screens (including 
graphics) on your video. A powerful command then generates the 
BASIC instructions to recreate the screen. For the first time, a 
program for automatic generation of video display forms. (16KTape 
or 16K Disk) $24.95 

THE MAGIC CURSOR (additionally makes sophisticated Data Entry 
and Display easy. With Magic Cursor I you define the Data Entry or 
Display fields directly on your screen. The definition commands 
generate the BASIC instructions to implement the Data Entry and 
Display. The Magic Cursor I has commands which move, center and 
duplicate blocks of graphical or alpha/numeric displays. You can 
even justify text. (16K Tape Only) $79.95 

THE MAGIC CURSOR II adds the power to write animated games 
easily in BASIC. The Magic Cursor II allows you to reload previous 
screens either from memory or from Disk. You can then modify them 
and store either the modified screen or only the changes. (32K Disk 
Only) $99.95 

THE MAGIC CURSOR III will be available soon for the new Model II 
Computer (32K One or more Disks) $149.95 

THE MAGIC CURSOR IV provides the features of Magic Cursor II 
but stores an assembly language program. (32K Disk 
Only) $99.95 



* Home * 
^Animated programmer 

Games „ * # 

Writer * w 

^Assembly * 

* * Language ^ 

* Progra mtner 

* * 

* Commercial^* 

M Softw<* re + ^ * 

* Houses 

OTHER PROGRAMS BY CCC 

GENERAL LEDGER, Accounts Payable, Accounts Receivable, 
etc. - We are an official Osborne/McGraw Hill conversion co. 

RESTAURANT MANAGEMENT - Cost analysis, inventory 
control, recipe design, labor scheduling, etc. for both fast food 
and traditional restaurants. 

INSURANCE RATING - Instant pricing for policy premiums 
based on age, marital status, etc. for both Texas and National. 

SMALL BUSINESS MANAGEMENT - From our library of custom 
design for DIAMOND & JEWELRY MERCHANTS. DONUT 
SHOPS, SAILBOAT SAIL SHOPS, CONSTRUCTION FIRMS. 
ENGINEERING FIRMS. MANUFACTURING FIRMS- in the areas 
of cost analysis, product design, inventory control, product 
pricing, purchase order, invoicing, word processing, etc. 

PROGRAMMER UTILITIES for supporting assembly language 
programming and disk modification. 

MAGIC MEMORY - personal inventory programs for stamp 
collection, coin collectors, personal libraries, etc. 

WRITE FOR OUR COMPLETE 
SOFTWARE CATALOG!! 



Send Check or Money Order payable 



£mw CUSTOM 

V COMPUTER 
CENTER, INC. 



Call 713/474-2428 or order by mail Master Charge. Visa. Certified Check or Money Order accepted 
Personal Checks require t4 days to clear COD or collect calls not accepted Software guaranteed 
for replacement only Prices subject to change without notice Some programs supplied on cassette 
tape For disk versions, the cassette supplied will automatically create a disk file 




ATTN: Jim Martens 
P.O. BOX 58042 
HOUSTON, TEXAS 77058 
or call: 713/474-2428 

'Trademark of Radio Shack. ^"^ 
a Tandy Co f£& 



* Reader Service - see page 162 
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£ft ACCOUNTANT 



by Michael Tannenbaum C.P.A. 



"... even if these problems 

can be overcome, the 

mechanical construction of the 

Model I has limitations. M 



During the period in which 1 have been 
writing articles for this column, one of the 
most frequently asked questions has been how 
much disk storage is available for the Model I 
microcomputer. 

By now, most users know that the Model I 
can handle up to four drives. Each drive ac- 
commodates just under 90,000 bytes (words) of 
information. 

In some data processing systems a word 
equals one alphanumeric character, however, 
the 80 can pack several numeric characters into 
each word. Accordingly, it is difficult to 
calculate the numbers of words of disk storage 
available for mixed numeric and alphabetic 
data. 

How Many Bytes 

The technical reasons for this are as follows: 

• Integers — up to 64,000 — require two bytes 
of storage. 

• Single precision data require four bytes. 

• Double precision data require eight bytes 
and each alphabetic character requires one 
byte. 

An additional complicating factor is the way 
the 80 reads and writes disk records. All Model 
I operating systems, with the exception of 
VTOS 3.0, read and write 256 bytes at a time in 
the random mode. Thus, if you have a random 
access file with less than 256 bytes, you lose 
storage. 

Data type and record length affect the 
ultimate size of the file. However, the real 
storage problem in the TRS-80 is the fact that a 
file cannot span more than one disk. For exam- 
ple, a file with 6,000 names requires multiple 
disks to contain the data. You must break the 
file into segments. Each segment can be entered 
on a separate disk, but the software must be 
written so that the directory of each disk is ac- 
cessed before processing. 

Of course, changing data on this file causes 
problems. As you add and delete data, gaps ap- 
pear. The system would have to maintain a 
record of every gap and, periodically, rearrange 
the file to accommodate new data. 

Since the data would have to be inserted ran- 
domly, access would require the extraction of 
key words and the development of a sorted in- 
dex. To sort 6,000 keys into any kind of order is 
a time-consuming task on the Model I. 

If the sort could not be performed in mem- 
ory, then a disk sort and an index disk would be 
required. This separate disk might be required 
in any case to retain key words and pointers to 
locations on the main data file. 

Using an index disk can also create prob- 
lems. You might have to remove data disks to 
provide a drive for the index, if sufficient core 



was not available for the index to be kept in 
memory. 

But, even if these problems can be overcome, 
the mechanical construction of the Model I has 
limitations. The Model I can only detect if a 
disk drive is on or off line. The program has no 
way of knowing whether or not someone inad- 
vertently took out a portion of the file. Because 
this increases the chance for error, most soft- 



ware developers prefer not to write programs 
for accessing large files on the Model I. 

Although the Model II disks contain more 
data than the Model 1 diskettes, you cannot 
escape the limitations of floppy storage. Even 
with its larger files, a Model II cannot control 
all items. Systems that use extremely large files 
require a hard disk. 

Continue to next page 



CAPTAIN #? 

hv Rnh I iddil %T ^T 



by Bob Liddil 



Here's Captain Eighty, sitting in his re- 
viewer's chair, assessing this month's 
mail. Response to the contest was lively. En- 
tries ranged from high camp to very serious. 
Many readers were less than convinced that we 
really had a contest going at all. 

Andy Anderson, from Larimore, ND, sug- 
gested an Elections game, where players receive 
a random dollar amount from Fat Cats, to be 
spent in media exposure, transportation, office 
support and insurance against ethnic jokes, 
slipping on buses, and stuff like that. A second 
program, appropriately entitled Headache, 
dealt with taxes, government agencies, the 
economy and all those pesky problems that in- 
terfere with a politician's partying, after his 
election. 

The last of Andy's three paragraph program 
series would finance and manage World War 
111, a situation that came about as a result of 
our messing up in the second. 

Thanks, Andy. 1 hope the programmers out 
there are paying attention. 

More Letters 

Craig Griffin, from Bessemer, AL, would 
like to see language translation programs, 
particularly Portugese, in which an English 
sentence entered would elicit the appropriate 
foreign phrase. Very useful. After all, a com- 
puter has more memory available than those 
little hand-held calculators. 

Tom Mason, of Akron, OH, suggests pro- 
grams that "shoot anything" — X-wing fight- 
ers airplanes, ducks, tanks, ships, world lead- 
ers — and with selectable skill levels. Impres- 
sive graphics is a must for the hit, says Tom, 
as well as a user selected description: boss' 
name, mother-in-law's name. You get the 
idea. 



Al Mescha, of Chicago, IL, sent in a one 
liner (that contest hasn't started yet, Al). He 
says, "When 1 use the INPUT command, I 
use the following format: PRINT STRINGS 
(60)," ";CHR$(28); :INPUT. This homes 
the cursor and clears the first line only. Thus, 
you only have to draw your graphs, pictures 
or whatever once." This is a handy little ditty, 
try it. 

Rob Robinson, of Palo Alto, CA, sent in an 
educational program he wrote for his six year 
old. Called Scrambled Words, it features a 
blinking cursor and a reward display named 
Anthro. This program is excellent. 

Rob, I suggest that you submit your program 
to 80 Microcomputing along with a descrip- 
tion. It would fill a void in 80'% educational pro- 
gramming department. 

NITS Software, Rialto, CA, also sent me an 
educational sampler. To my absolute surprise 
and delight, Wordmaster, a terrific reading and 
spelling program, loaded the first time out. A 
fresh, professional approach to the subject, 
Wordmaster gives the student (early third 
grade) plenty of work without overwhelming 
him. Wordmaster builds vocabulary and 
reading skills with style, grace and charisma. 

This is not NITS' only offering. The com- 
pany has a catalog full of educational material, 
which should be every bit as well written as the 
above. Drop these guys a line at 680 North Ar- 
rowhead Ave., Rialto, CA, 92376. I'm sure 
they'll pop a catalog to you in the mail. 

Radio Shack has a new Adventure, Pyramid 
2000. It's impressively packaged and 
reasonably priced. Hard core Adventure fans 
will no doubt mourn the omission of the Scott 
Adams split screen and blinking cursor. Radio 
Shack chose to ignore all Adams' genetic 
Continue to page 26 
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However, the Model II can detect changes in 
a drive's directory. When a disk is removed and 
a new disk is put in place an initialization com- 
mand must be used. The DOS then reads the 
directory to learn its contents. 

The Model II has an additional advantage 
over the Model I — with the exception of those 
who use the VTOS 3.0 operating system — in 
that every byte on the disk is available. It is the 
disk operating system that fills the tracks and 
handles sector boundaries. This advantage 
means that not only can the Model II utilize 
disk space more efficiently, but the burden of 
managing data storage is removed from the 
programmer. 

Recordkeeping from Osborne 

During the past year, I have had the oppor- 
tunity to review accounting software developed 
by the Osborne Company. This software, 
originally developed for a Wang Minicom- 
puter, was designed for firms using job cost 
recordkeeping. Because this system has been 
published in book form, many software houses 
have copied the package and are distributing it 
under their name. 

I have reviewed portions of the package from 
various vendors. The most recent was the Ac- 
counts Receivable, adapted from Wang BASIC 
by the Small Systems Business Group. Perspec- 



tive purchasers of Osborne systems are advised 
to purchase the description books which are 
available at many computer stores: Payroll and 
Cost Accounting in BASIC, Accounts Receiv- 
able, General Ledger. 

Since the system was designed to keep track 
of expense by job, the program handles large 
files. When the job is billed, the net profit on 
the job can be calculated. 

The Small Systems Business Group has 
dropped much of the job-costing features of 
the original Osborne program. This is for- 
tunate, because it reduces the size of key files. 
On the Model 1, the Accounts Receivable pro- 
gram permits a maximum of 670 accounts and 
650 transactions for a four-disk system. If these 
limitations do not dissuade you, it has its ad- 
vantages: 

• The documentation explains the system 
and permits modification. 

• The user manual is relatively readable. 

• Because of the program's wide publication, 
it has been accepted as somewhat of a business 
standard. 

The receivable system is of the open item 
type. Open item receivable systems retain 
details of all active transactions (invoices, 
payments and credits) until updated. Once up- 
dated, completed transactions are purged, and 
only open items are retained. 



There are two advantages to this type of file 
maintenance. One is that file agings indicate 
open transactions. This significantly aids 
follow-up and resolution of old balances due. 
If only a balance forward is kept, details of 
outstanding items must be researched or main- 
tained manually. 

A Second Advantage 

The second advantage of an open item sys- 
tem is that aging reports can be prepared ac- 
curately, since the date of all transactions is 
present. In a balance forward system, cash ap- 
plication is particularly troublesome, if applied 
to the wrong category. 

Under the Osborne system no payment or 
transaction can be recorded, unless an invoice 
is already on file. This is both a safeguard and 
an inconvenience. It is a safeguard in that trans- 
actions can be tracked back to a document. 
However, if you get cash on account before an 
invoice is prepared such a system will cause 
problems. In order to record the cash on the 
receivable system, a dummy invoice must be 
created. This is inconvenient to say the least. 

Generally, you will find that the Osborne 
program creates excellent reports in a readable 
format. The receivable system can be pur- 
chased separately, or integrated with a payables 
system and the general ledger. ■ 



EVEN COMPUTERS GET THE BLUES 



Has your TRS-80 been sluggish lately? Slow to respond? Had 
excessive keyboard bounce? 

The problem might be low voltage, or a BASIC misunderstanding, or 
IRON POOR SOFTWARE! 

Do you serve your TRS-80's meals on paper sheets? Do you 
(shudder) write it yourself Recent studies indicate that keyboard- 
feeding causes MALIGNANT BUGS! 

CLOAD Magazine is published monthly on a magnetic IRON OXIDE 
tape, wound up inside a C-30 cassette Now you may ask "Why 
bother?", but I can assure you that our computer cassettes are 
DIRECTLY readable. I repeat DIRECTLY readable by your 
computer We have Thrills. Variety, and Absurdity We have 
every program your computer has ever wanted to run after 
a hard day at the job We even include our infamous "yellow 
sheets" with every issue, filled with lies about the TRS-80 
computing scene 



$36.00' 

S 3.50' 
SIO OO * 



12 Monthly cassette issues 

(over 60 programs) 

Single issues 

Best of CLOAD 

(9 programs w/ listings) 

* CA residents please add 6% to non-subscription orders 
Please write for overseas rates 

Master Charge / Visa Welcome Also Cash & Gold 




CLOAD 



^32 



MAGAZINE. 



P.O. Box 1267 • Goleta CA 93017 • (805) 964-2761 



- Reader Service — see page 162 



80 Microcomputing, June 1980 • 21 



THE ASSEMBIY LINE 



by William Barden, Jr. 



"This is the heartbreaking 

story of why it is so 

difficult to use TRS-80 graphics 

to their full potential. " 



Six into eight don't go", said the Duchess, 
evenly. 
I've always wanted to start a best selling 
novel with that line. The novel has never mate- 
rialized, but at long last I can use it. This is the 
heartbreaking story of why it is so difficult to 
use TRS-80 graphics to their full potential. 

Most of the readers know very well how 
graphics are used on the TRS-80. To refresh 
your memory: There are 16 lines of 64 charac- 
ter positions on the video display. Each charac- 
ter position occupies one byte of video display. 
The addresses of video display memory are 
from 3C00H through 3FFFH (15360 through 
16383 decimal). 



"If you're hazy on 

this point use BASIC 

to POKE various values 

into video memory . . . ' 



When any of those bytes in video display 
memory are loaded with a value from 20H 
through 7FH (32 through 127 decimal) an 
ASCII character is displayed on the screen. The 
ASCII character is generated by the video dis- 
play electronics hardware on the CPU board, 
which contains a character generator chip that 
translates from ASCII into a pattern of 5 by 7 
dots for the character. 

When a byte in video display memory is 
loaded with a value from 80H through BFH 
(128 through 191 decimal), a graphics character 
is used in place of the ASCII character; the 
character generator is not used in this case, but 
the logic sets one or more of six pixels, depen- 
dent upon which bits are set in the value as 
shown in Fig. 1 . 

Note that for any graphics character, bit 7, 
the "high-order" bit, is set, bit 6 is ignored, and 
bits 5 through determine whether the pixel is 
on or off. 

If you're hazy on this point, use BASIC to 
POKE various values into video memory until 
you can predict which pixels will be set based on 
the value POKEed. 

What we'd like to develop here is an assem- 
bly language routine to SET any one of those 6 
by 1024 pixels. Although the 6144 pixels pro- 
vide rather coarse resolution when the TRS-80 
is compared to some other microcomputers, 



the graphics mode is much better than working 
on a character position basis. 

Set the Pixel 

Before we can develop the assembly lan- 
guage code, we need to know the algorithms in- 
volved. (Algorithm is simply a synonym for 
plan or formalized procedure.) Let's see what's 
involved in setting a pixel on or off. 

Fig. 2 shows a generalized character position 
on the screen that contains a pixel to SET or 
RESET. If we start with any X,Y position, 
what can be said about the position of that pixel 
in the 1024 bytes of video display memory? 

First of all, the line number of the character 
position containing the pixel is given by the 
quotient of Y/3. For example, Ys of 0-2 are in 
line 0; Ys of 3-5 are in line 1 ; and so forth, up to 
Ys of 45-47, which are in line 15. What hap- 
pened to the remainder of Y/3? Ask me again 
later. 

The character position along the line is given 
by the quotient of X/2. There are 64 character 
positions along the line, numbered through 
63 . Xs of and 1 are in character position 0; Xs 
of 2 and 3 are in character position 1; and so 
forth, up to Xs of 126 and 127, which are in 
character position 63. What happened to the re- 
mainder of X/2? Ask me again later. 

Knowing the line number and character posi- 
tion, it is easy to find the actual location of the 
video display byte that contains the pixel in 
question. If the line number is the quotient of 
Y/3, and the character position is the quotient 
of X/2, then the byte displacement, or position 
from the start of video display memory is: Byte 
Displacement = (Line #)*64 + Char Pos. The 
actual memory location is the Byte Displace- 
ment + 3C00H, or Byte Location = (Line 
#)*64 + Char Pos + 3C00H. 

Now that we know how to find the byte con- 



CHARACTER 

POSITION 10-63) 




11)24 

( HARACTER 

POSH IONS 





COL 1 
' 


COI 

i 


ROW0 






ROW 1 


K 




ROW 2 







CHARACTER 

POSITION 

CONTAINING 

PIXEL 



Fig. 2. Line Number, character position along 
line, row, and column of Pixel 

taining the pixel, how do we know which of the 
six bits controls the pixel? Would you hand me 
those remainders, please? 

If we separate each graphics byte into two 
columns and three rows, we can use the re- 
mainders of Y/3 and X/2 to find the right bit. 

The remainder of X/2 defines the column 
number of the pixel. For example, Xs of 
0,2,4,6, etc., define a pixel in column number 
0; Xs of 1,2,5,7, etc., defines the row number 
of the pixel. Ysof 0,3,6,9, etc., are in row 0, Ys 
of 1,4,7,10, etc., are in row one, and Ys of 
2,5,8,1 1, etc., are in row two. 

Knowing the row and column, we can also 
Continue to 24 
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Precision 
Engineered Drives... 



Power supply guaranteed 
•or one /ear 



More Capacitance Insures stable 
operation over greater line 
voltage variations (105- 125 Vac.) 




Scratch resistant steal cover: Primed and baked 

enamel finish, vlrluaiiy eliminates video interference Color 

compatible with Radio Shack or Zenith Z89 

Increased ventilation lor 

additional cocang Top 

side and bottom vents mean lower 

operating temperatures 

for longer Ufa. 

Switch designed with high 
cunent ratings (10 AMP| 



Transformer designed as integral 
part of system lor best line 
regulation. Mot separately encased to 
avoid heat build-up providing longer We 



Designed to UL specifications. 
Wide operating temperature range (0°C to 50°C) 
Tested to 1500 vofts<rajt to^output isolation lor enhanced 
powei su»ge protection 



Simpler more 
reliable circuitry. 



Easy access to terminating 
resistor for easy field 
conversion Irom drive 
to drivel 2 or 3. 



Extender 

Easy plug-in access 



3 wire g rounded line cor* 
tor added operator s afe ty. 



With the number of disk drives on the market increasing, 
more and more people are beginning to ask what's under- 
neath that cover. 

The CO 1 " series of disk drives have been designed for long 
life and ease of operation. The features shown above are what 
set our CCI drives apart from the rest With a CCI drive you get 
an integrated professional design! 

If you're still not convinced that you get the most for your 
money with a CCI drive, just ask for our complete specifica- 
tions sheet Then, compare our disk drives to anyone else's. 

5i/4" DRIVES 

CCI-100 40 Track (102K Bytes) for TRS-80* Model I $399.00 

CCI-189 40 Track (102K Bytes) for Zenith Z89 $499.00 

CCI-200 77 Track (197K Bytes) for TRS-80* Model I $675.00 
8" DRIVES 

CCI-800 77 Track (1/2 Meg Bytes) for TRS-80* Model I! $895.00 
All CCI drives are also available for 220 Vac (50Hz) operation. 

ComputerCity 



175 Main Street, Dept K-6, Charlestown, MA 02129 
Hours: 10AM-6PM (EST) Mon.-Fri. (Sat till 5). 



^215 



Operating Systems 

NEWDOS Plus for 5V4", 40 and 77 Track Drives -with over 200 
modifications and corrections to TRSDOS $ 1 1 0.00 

CP/M for Model I, Zenith $ 1 50.00 

CP/M for Model II, Altos $250.00 

Software by S&M Systems 

IMSEQ-80'"— Indexed Sequential Access Method ( ISAM ) 

fortheTRS-80Modell. 
Four machine language programs that can be called from your 
BASIC program via (JSR functions to access records either sequen- 
tially or randomly. The INSEQ-80 programs maintain all indexes and 
chains for you. Includes reorganization utility to consolidate files. 

$49.95 
Professional Business Software using INSEQ-80 for 
the TRS-80* Model I and Zenith Z89. 
Accounts Payable, Accounts Receivable, 

General Ledger, Payroll per package $99.00 

Inventory per package $125.00 

TO ORDER CALL 

TOLL FREE 1-800-343-6522 

TWX: 710-248-1796 

Jn Massachusetts residents call 617/242-3350 

For detailed technical information, call 617/242-3350. 
Freight Collect, FO.B. Charlestown. 
TRS-80 is a trademark of the Tandy Corporation 



Products also available from: Radio Shack, NEC, Centronics, Paper Tiger, TI, Altos, MPI, Zenith, Mattell, ATARI, 

PET, OK1DATA, Apple, Eaton/LRC. 

FRANCHISE AND DEALER (NATIONAL/INTERNATIONAL) INQUIRIES INVITED 

Retail Stores: MA: Burlington, Charlestown, Framingham, Hanover NH: Manchester Rl: Providence 
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THE ASSEMBLY LINE 



find the bit position in the byte by Bit 
Pos = (Row #)*2 + Col #. For example, row 
one, column number one, is defined by bit 3 of 
the byte. 

Seven Incomprehensible Formulas 

We now have seven incomprehensible for- 
mulas that we can use to develop the code for 
SETting or RESETting any pixel. They are 
shown in Fig. 3. 

Now that we've got the formulas, let's 
develop the assembly language routine. Hum- 
mm . . . dividing by two is easy — a simple shift 
right will divide by two and even save the re- 
mainder of or 1 in the carry. Multiplying by 
64 is also quite easy — an ADD HL,HL multi- 
plies by two and six of them will multiply by 64. 
It look like the hardest part is the division by 
three. Three is not a "convenient" divisor as it 
is not a power of two. The code for this task is 
shown in Listing 1 . 

The code from SET to SET 10 finds the char- 
acter position (CP) by dividing the X value in 
the E register by two. The SRL shifts the con- 
tents of the E register one bit right to do this, 
and the remainder of zero or one is shifted to 
the carry flag after the shift. The state of the 
carry is used to put either a or 1 into the D 
register for the column number (CN). 

The code from SET 10 to SET25 finds the 
line number (LN) and row number (RN) by di- 
viding the Y value by three. The divide is done 
by successive subtraction of three from the Y 
value in the A register. The count of the num- 
ber of times three is subtracted is held in the B 
register. As long as A remains positive, the sub- 
traction is continued. When A goes negative, 
the ADD A,3 restores the remainder to A while 
the quotient remains in the B register. 

At this point we have the four basic values of 
line number (B), character position (E), row 
number (A), and column number (D). 

Now we can use these values to find the ac- 
tual byte containing the pixel, and then find the 
bit within the pixel. SET25 to SET27 finds the 
bit position in the byte by multiplying the row 
number by two (RLCA) and adding the column 
number. This bit position is saved in the C 
register. 

The code from SET27 through SET32 multi- 
plies the line number by 64 by shifting it 6 bit 
positions left. This multiplication is done by 6 
ADD HL.HL instructions. This must be a dou- 
ble (16-bit) add because the product may be as 
great as 15*64 (960). At SET32, the line num- 
ber'64 is in the HL register pair. 

The code from SET32 to SET34 adds the 
character position in DE to HL to find the byte 
displacement, and then adds the displacement 
to 3C00H to find the actual location of the 
byte. At SET34, the location of the byte con- 
taining the pixel is in the HL register pair. 

Now the only thing left to do is to SET the 
pixel of the byte. The code from SET34 on uses 
the bit position in C to "index into" a table of 
masks, using the IX register. The A register is. 
loaded with the byte containing the pixel (LD 
A,(HL)), followed by an OR (IX) to set the pro- 
per pixel, followed by a store of the altered 
value (LD (HL),A). Note that bit 7 is always set 
by the mask value to ensure that graphics mode 
will be used. 



We now have a general subroutine to set any 
pixel at will. 

Reflections on the SET Subroutine 

What you're seeing in SET is the result of a 
great deal of work. I could say here that I sat 
down and wrote this code in five minutes. 
Tain't so. I have seen programmers who could 
generate such code in fifteen minutes, but they 
are few and far between. It would not be un- 
usual for many programmers to spend a day on 
the algorithms and a day on the code for this 
subroutine. 

How fast can assembly language code be 
generated? This depends on a number of fac- 



tors, such as access to the computer, interaction 
with the system, complexity of the code, defini- 
tion of the problem and others. As assembly 
. language programmers on the TRS-80, we have 
probably the best of all environments — a highly 
interactive system with a single user and ex- 
cellent assembly and debugging tools. 

Typical industrial standards used for assem- 
bly language code are on the order of 10 to 30 
lines of assembly-language code per day! 
That's right, per day! Of course, those figures 
are based upon the complete program design, 
coding, debugging and documentation task, 

Continue to 26 
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and also are based upon larger programs than 
ten or twelve instruction subroutines. 

On a positive note, though, standards for 
higher level language code, such as BASIC, 
also show that not many lines of code can be 
generated rapidly when the entire design, 
coding, debugging and documentation tasks 
are considered. 

The point of this monologue is that you 
should not be dismayed if some of the assembly 
language code takes longer than you expected; 
you have plenty of company! 

The SET routine is a "medium hard" piece 
of code, and it encompasses a lot techniques. If 
you can follow it, you've gone a long way into 
learning assembly language methods. 

By the way, it's entirely possible that there is 
a more efficient way to accomplish this prob- 
lem. I would be most interested in any better 
subroutines. 

Why is it so difficult to SET a pixel? The 
"mapping" of X and Y into the corresponding 
byte and bit values is not straightforward, as we 
have seen. Could it have been made easier? 
Yes, but at the expense of increased hardware 
costs. For the moment, we have to "program 
around" the fact that six into eight don't 
go — evenly. 

Assembly line Programming Contest 

Back in the first Assembly Line column I of- 
fered a challenge to the readers in the form of a 
programming problem: "Given a number, find 
the integer portion of its square root in a short 
assembly language routine. For example, given 
137, find the 11 portion of 11.7047 in a short 
piece of code." 

Since that time I've received a number of 
replies, many with interesting comments about 
assembly language topics. I appreciate them all. 
There were three winners for this problem, and 
they will each receive an autographed copy of 
my new Howard W. Sams book Z-80 Micro- 
computer Design Projects, $12.95 ($11.95 
autographed). 

Some of the readers tried brute force for 
finding the square root, but there is a trick. The 
"nth" perfect square is the sum of the first n 
odd integers. A perfect square is V, 2\ V, 4\ 
and so forth. If n is six, for example, its square 
is 36, which is the sum of the first six odd in- 
tegers, 1+3 + 5 + 7 + 9+11. All we must do to 
find the integer portion of the square root of 
any number is to successively subtract 
1,3,5, . . . until the residue goes negative. The 
number of subtractions, minus one, is the in- 
teger portion of the square root . I f we have 137, 
for example, we have: 

137- 1 = 136-3 = 133-5 = 128-7=1 21- 
-9=112-11 = 101- 13 = 88-15 = 73- 
17 = 56- 19 = 37-21 = 16-23= -7. We 
had 12 subtractions, and 12 minus one is 1 1, the 
integer portion of the square root. 

The shortest 8-bit routines were submitted by 
Gary E. Clark of Bethesda, MD and Cliff De- 
Jong of Colorado Springs, CO. As several 
readers pointed out, I had not specified 
whether 8 or 16-bit arithmetic was to have been 
used. The shortest 16-bit routine was written by 
James Braud of Bay St. Louis, MS. Cliff's 8-bit 
routine and James' 16-bit routine are shown in 
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Fig. 3. Pixel Formulas 

Program Listing 2. 

The eight-bit routine uses 10 bytes. The BC 
register pair is loaded with one. In fact, this 
load really loads the C register with one and the 
B register with 0, saving one byte over two 
separate "load immediates" of B and C. The 
remainder of the routine is a loop. Each time 
through the loop, the count in B is bumped by 
one, and the odd number in C is incremented by 
two. A SUB of the odd number in B is per- 
formed before the increments. If the result has 
gone negative, a return from the subroutine is 
made. 

The 16-bit subroutine uses 11 bytes. The A 
register is first zeroed to hold the count minus 
one, which may be a max of 255. The BC regis- 
ter is then loaded with - 1 . This will be changed 
by decrementing twice to - 3, - 5, - 7, and so 
forth. The loop portion of the subroutine adds 
the current negative odd number to the residue 
in HL. If HL goes negative the carry flag is 
reset, and a return is made. The remainder of 
the loop bumps the count in A, decrements the 
odd number to the next value, and then loops 
back for the next iteration. 

Although the subroutines contrived here are 
short in terms of memory requirements, they 
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niceties and go their own way. But whatever 
Pyramid 2000 lacks in familiarities, it makes up 
in descriptions and plot. 

Name That State 

Last on the review list is a game-educational 
offering from Synergistic Solar, Inc., Miami, 
FL. Name That State Quiz is the title, and it 
comes with sound. The program draws the 
shapes of different states on the screen and pre- 
sents a user selected format of questions about 
that state. 

Identifying a state by its shape can be a bit 
difficult, but I managed to get the first four or 



are not necessarily the fastest code that can be 
implemented to find the integer portion of the 
square root. If we assume that the average 
16-bit square is 32768, then it will take 181 
iterations to find the integer portion of the 
square root. 

Each iteration takes about six instructions, 
and the average time for each instruction is 
perhaps six microseconds. Roughly, then, the 
average processing time for square root com- 
putation will be: 

181 •6 , 6 microseconds, or about 6.5 millisec- 
onds. Putting it another way, about 150 roots 
can be extracted per second, on the average. 

This would be quite efficient for a DDS, but 
is quite inefficient for assembly language code. 
The routines presented here are interesting 
because of the "trick" involved and are not 
presented as the best method of finding square 
roots. 

The trade-offs between memory space and 
speed are just two factors to consider in writing 
any program. Other factors are program devel- 
opment time (Does the code take a long time to 
produce because it is too "tricky"?), debugging 
(Has the code been adequately debugged, with 
test cases that represent typical and limiting 
parameters?) and program maintenance (Will 
you pick up the code at a later time when a bug 
is discovered and be completely at a loss to ex- 
plain the tricks you employed?). 

A New Challenge 

Since the last puzzle was moderately suc- 
cessful, here's a second challenge to the readers 
of The Assembly Line. All results should be 
sent to me at the address at the end of this col- 
umn. We'll announce the winners in a later col- 
umn, and there'll be a token prize to make it in- 
teresting. 

Problem: Write the fastest subroutine possi- 
ble to multiply two eight-bit unsigned (0-255) 
numbers in the A register and B register. The 
result should appear in the HL register pair, 
and the two operands in A and B should be un- 
changed. 

That's it for this month; next month we'll 
continue the topic of high-speed graphics, and 
have other topics geared to the assembly lan- 
guage beginner.! 



five right. T'pring, resident tabby cat in the 
Captain 80 headquarters, came over to investi- 
gate the pleasant sounds. Then I got one 
wrong. The computer emitted this unearthly 
combination buzz and gargling noise. T'pring, 
thinking I had killed it and she was next, leaped 
from the side of the desk, bowled over a card- 
board box, lost traction, bounced off a door- 
jam and took up residence under a bed. 

I liked Name That State Quiz for its edu- 
cational value but a combination of its slow 
drawing speed and chalk-on-the-blackboard 
sound could hinder it in the classroom. 

Next month, the winner of the Program in a 
Paragraph Contest will be announced. Until 
then, here's Captain 80 in Software Secret 
Headquarters signing off. ■ 
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Apparat, Inc., announces the most 
powerful Disk Operating System for the 
TRS-80*. It has been designed for the 
sophisticated user and professional 
programmer who demands the ultimate 
in disk operating systems. 

NEWDOS/80 is not meant to replace 
the present version of NEWDOS 2.1 
which satisfies most users, but is a 
carefully planned upward enhance- 
ment, which significantly extends 
NEWDOS 2.1's capabilities. This new 
member to the Apparat NEWDOS' 
family is upward compatible with 
present NEWDOS 2.1 and is supplied 
on Diskette, complete with enhanced 
NEWDOS + utility programs and 
documentation. Some of the 
NEWDOS/80 features are: 

• New BASIC commands that 
supports files with variable record 
lengths up to 4095 Bytes long. 

• Mix or match disk drives. Supports 
any track count from 18 to 80. Use 



35, 40 or 77 track 5" mini disks drives 
or 8" disk drives, or any combination. 

A security boot-up for BASIC or 
machine code application programs. 
User never sees "DOS READY" or 
">READY" and is unable to 
"BREAK", clear screen, or issue 
any direct BASIC statement 
including "LIST' 

• New editing commands that allow 
program lines to be deleted from one 
location and moved to another or to 
allow the duplication of a program 
line with the deletion of the original. 

i Enhanced and improved 
RENUMBER that allows relocation 
of subroutines. 

• Powerful chaining commands. 

> Device handling for routing to 
display and printer simultaneously. 

i CDE function; simultaneous striking 
of the C. D and E keys will allow 
the user to enter a mini-DOS 
to perform some DOS commands 



without disturbing the resident 
program. 

• Upward compatible with NEWDOS 
2 1andTRSDOS2.3. 

• Includes Superzap 3.0 and all 
Apparat 2.1 utilities 

NEWDOS/80 with all of the 
NEWDOS + utility programs, many of 
which have been enhanced, is priced at 
just $149.00 and is available at most 
TRS-80 dealers. Previous NEWDOS 
owners may receive full trade in 
allowance toward the purchase of 
NEWDOS/80 by including with their 
order the serial number of their 
NEWDOS 2.1 diskette, the price paid 
and where purchased. In most cases 
that purchase price will be subtracted 
from the price of NEWDOS/80. As with 
NEWDOS 2.1, NEWDOS/80 relies on 
the TRSDOS and Disk Basic Reference 
Manual published by Radio Shack. 
NEWDOS/80 documentation supports 
its enhancements and upgrades only. 
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*r^0 hv Dennis Kitsz 



by Dennis Kitsz 



"A gate electronically 

evaluates its input to 

determine the pattern of 

similarity and difference. " 



Between last month and this, I hope you 
were successful in building (he input port 
for the TRS-80. This month we will finish with 
some theory and an application. 

Fear not; basic digital electronics is tediously 
logical, but seldom very difficult. Let's return 
to the locked door analogy we used in April and 
see how the door can be opened. Here is one of 
the eight "tumblers" of the output port. 




The triangle is a buffer — it leaves the signal 
unchanged, but protects the TRS-80's electron- 
ics from being overburdened with attachments. 
The second triangle is an inverter, having a 
small circle at its output meaning NOT. If the 
signal (bit) entering is one, its output is NOT 
one; if the input is zero, the output is NOT 
zero. The 81LS95 integrated circuit contains 
eight buffers, and the 8 1 LS96 package contains 
eight inverting buffers. 

The Gate's Job 

A gate electronically evaluates its input to 
determine the pattern of similarity and dif- 
ference and produces a specific output. The 
design below represents one sort of simple gate: 




This gate's job is to determine if the first and 
second inputs are both one (high). Only then 
will its output swing high. We are using eight 
address signals to open the port's lock, so our 
"lock cylinder" must evaluate eight input. It 
looks like this: 




Notice the NOT circle at the output. It means 
that if all input is high, and only then, the result 
will be NOT high. This cylinder is an 8-input 
NAND (NOT AND) gate. 

How do we use this lock? In April's column, 
our key was cut to binary 1011 0010, which 
translates to hexadecimal B2 or decimal 178. 
The NAND gate, the lock's cylinder, has to see 
all one's to operate, so we set up the tumblers to 
produce this result: 




The signals shown by the circled numbers are 
all ones — precisely what the "cylinder" circuit 
needs in order to respond. The tumblers are set, 
the NAND gate responds by trying to open the 
latch. Now refer to the complete circuit dia- 
gram: Zl and Z2 are the tumblers, Z7 is the 
cylinder. Z5 and Z6 form the latch. The job of 
this latch is to allow signals to pass through its 
door when it is unlocked (enabled) and at no 
other time. This latch operates on a high (one) 
signal. 

Look for a moment at Z8; it is a NOR (NOT 
OR) gate. If the first OR second (or both) input 
is high, the output is NOT high. Only if each in- 
put is low, will this gate swing high. Let's 
follow this through. The address of our output 



device has been found by the "tumblers" and 
the "cylinder" turns, but the Z5-Z6 latch will 
only snap open if a low signal called OUT is be- 
ing sent by the computer at the same time. Data 
from the computer can now flow through buf- 
fer Z3, into the latch, and is locked in place for 
our use. 

Before looking at the rest of the circuit, 
notice that the OUT signal from the TRS-80 
also enables Z3. If we have so carefully de- 
signed our lock and latch, why isn't Z3 just left 
on? Isn't this extra signal redundant? One truly 
critical aspect of the eight lines handling data 
on the TRS-80 — in fact, on virtually all micro- 
computers — is the dual use of these lines. 

An address is a set of signals always com- 
manded by the Central Processing Unit (CPU) 
in the computer; on the other hand, data must 
flow both to and from the microprocessor. This 
data, whether in or out, is sent on the very same 
set of signal lines, the "data bus." The comput- 
er has to tell us which way the data is expected 
to flow, and we must respect that. The CPU 
gives us this information on separate signal 
lines, some of which READ data from memory 
or WRITE data to memory, and two similar 
signal lines which indicate INput to and OUT- 
put from ports. 

Now, turn back to the diagram, and notice, 
in addition to the OUT line going to Z3, there is 
also an IN line to Z4. If we have any intention 
of relating reasonably to the outside world, the 
"data" door had better swing both ways! 

A Short Circuit? 

But if the output of Z4 is connected to the in- 
put of Z3. doesn't this form a short circuit? Or 
does Z3 get confused as to what input it is 
receiving? The answer could be a devastating 
yes. However, if we respect the computer sig- 
nals, the doors can appear to be invisible— a 
special condition, a third state, neither on nor 
off, but rather one appearing electronically dis- 
connected. A signal comes from Z7 to tell Z3 
and Z4 (each an 81LS95 buffer) that their ad- 
dress has been selected; but the computer must 
send an IN or OUT signal to decide which one 
will be used — which way the information door 
will swing. 

If the door swings in, the computer wants in- 
formation from the outside world (for more de- 
tails, see "A Simple Interface" in 80 Micro- 
computing, February 1980). When the door 
swings out, the signals arc latched by Z5 and Z6 
for our use. 

Finally, take note of the small circles at four 
of the outputs of each latch (Z5-Z6). Even at 
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this final stage, we have our choice of data 
either in the form the computer sent it, or in its 
inversion. Some peripherals may turn on with a 
high signal, others with a low signal. It allows 
us programming simplicity, as we can always 
think of "on" as "one," no matter what con- 
trol signal the peripheral device expects. 

Why, then, do we not have the option of in- 
verted signals on the input? It is possible, but 
because the TRS-80 is a computer, it can with 
simple elegance invert the input signal in a pro- 
gram— ihe software equivalent of an output 
latch! 

I want to encourage you to understand that 
this device is versatile and can be a real alter- 
native to searching for the special, expensive 
hardware that fills your need. I have spent con- 
siderable time with this device because from 
time to time, future columns will describe sim- 
ple devices to "control your environment": 
generating sound, operating lights, motors and 
displays, checking temperature, and so forth. 
All will need a form of latched and buffered in- 
put/output device similar to this one. 

Fair (iiime 

finally, let's pui together a simple, but very 
useful attachment, a "fair" input for playing 
games on you? computer. Since the TRS-80' s 
keyboard is scanned a row at a time. Player A 
always has the advantage of being first in action 
games that use INKEYS. 

Attach a 1000-ohm resistor between each in- 
put of Z4 and the 5-voll supply. This ensures 
that the input "sees" a high signal, and that the 
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Before and after versions of the I/O latch project. 



millions of changing signals all around it don't 
accidentally trigger it into producing a zero. 
Next, obtain a small keyboard, or better for 
remote use, eight momentary-on pushbuttons. 
You can make a terrific set for youngsters or 
any folks who have difficulty with small objects 
(I built some for a nursing home) by attaching a 
long strip of aluminum to a large, flat board, 
so: 
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Fig. I. Completed Circuit Diagram 




WOOD BASE 



TO Z4 INPUT- 



Connect a wire between one side of each 
pushbutton and ground; connect the other con- 
tact to its respective input at Z4. This input 
floats high; pressing the button brings the 
signal low. 

Here's a subroutine to use it; players in this 
example are holding buttons 1 , 3 and 4 (con- 
nected to inputs INO, IN2 and IN3): 

1000 A = INP(178| 

1010 A = NOT A 

1020 A = A AND 13 

1030 X - <A AND i i ♦ 12 

1040 Y ■ (A AND 4) + 9 

1050 Z - (A AND 8) . 5 

1060 IF X - 13 PRINT "X". 

1070 IF Y - 13 PRINT "Y". 

1080 IF Z - 13 PRINT "Z". 

1090 PRINT : GOTO 1000 

REM * NUMBER OK PORT IN USE 

REM • COMPLEMENT OF INPUT VALUE 

REM • MASK FOR BUTTONS IN USE 

REM • PLAYER 1 (INO) 

REM • PLAYER 2 (IN2) 

REM • PLAYER 3 (IN3) 

REM • RESUtTSOF INPUT 

REM • RESULTS OF INPUT 

REM • RESULTS OF INPUT 

Both space and devilishness prevent me from 
explaining this program; I leave it to you. 
Clues? 1. Think it in binary. 2. Write it in 
binary. 3. Aha! 

Next month: software, (phew!)! 
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More for Less 

Speed. Capacity. Price 

The Vista V-80 mini disk system 
is 8 times faster than the 
TRS-80, 23% more 
storage capacity and 
costs only $395. 

Compare our performance to 
Radio Shack's TRS-80* Then 
match our price with theirs. Then 
decide which one is for you. 

Features 

• Vista offers 102K bytes to 
Radio Shack's 89K. That's 13K 
more bytes per drive for Vista. 

• The V-80 operates at 12ms versus 40ms 
for TRS-80. Our drive can operate at 5ms, but 
only 50% of TRS-80 will operate at that speed; 
therefore, Vista has purposely set the access time 
at 12ms. 

• Totally compatible with all available disk operating 
systems. 

• Upgraded system. Increased storage and speed 
patch supplied at no charge by Vista. 

• Drives are interchangeable for any location from 
Drive 0— thru Drive 3. 

• Immediate Delivery. 

• 120 Day Warranty 

Prices: 

Single Drive System $395 

Two Drive System $770 

Four Drive System $1450 

•TRS-80 is a registered trademark ol Radio Shack a Tandy Company 
TYPICAL CONFIGURATION 




FLOPPY 

DISK 

DRIVE 

»4 

ZD 



^2 



Vista Expansion Module 

The expansion Module provides a double density modification 
to your current Radio Shack interface that allows you to format 
diskettes in either single or double density. In double density 
format, your Vista Drive increases your storage capacity up to 
204K bytes on a single 40-track drive. 

To insure the highest performance possible, without com- 
promise, we recommend that you use Vista disk drives in con- 
junction with our Expansion Module * For a demonstration on 
your system call TOLL-FREE 800-854-8017 

P nCG $239.00 (includes all hardware and software) 

'Vista cannot guarantee Radio Shack drives to operate 100% in double 
density. 



The Vista Computer Company 1401 Borchard Street* Santa Ana. California 92705*714 953-0523 




Single Density Configuration ( 1 02K Bytes) 
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Bigger Is Better. 

Expandable storage. Greater Versatility. 

The Vista Model II* Disk Expansion 
System provides one, two or 
three drives, and adds 
up to 1.5 million bytes 
of storage. 

You say you want more disk stor- 
age, more programming versatil- 
ity ... at a reasonable price. Say no 
more. Our Vista Model II Disk Ex- 
pansion System may be just the an- 
swer for you. Choose from 1 , 2 or 3 
drives, already mounted. Each ad- 
ditional disk drive will add about 
1.5 million bytes of on-line stor- 
age to your system. Buy only 
what you need now. As your 
needs grow, you can continue to 
expand your capacity by adding 
another drive. It's that simple. 

But the best part we've saved for 
last. The price. It's cheaper than 
Radio Shack, yet our Model II will do 
everything Radio Shack's expan- 
sion system can do. The only differ- 
ence is our Model II will keep on working long 
after most others have stopped. That's why we are justifiably 
proud of our product's high reliability. And our 120-day warranty. Actually, it's 
not hard to stand behind a product — that works — if you know what we mean. 

'Model II is a registered trademark of Radio Shack a Tandy Corporation 

COMPARE OUR INTRODUCTORY LOW PRICES 

1 -drive Expansion System $1 ,000 3-drive Expansion System $2,1 00 

2-drive Expansion System $1 ,550 Additional Drives Only $ 525 

NO WAITING • IMMEDIATE DELIVERY. 




NAME 

ADDRESS 

CITY 

TELEPHONE L 



PLEASE Ol ONE: 

□ CHECK OR MONEY 
ORDER 



□ CREDIT 
CARD 



D COD 



. STATE 



ZIP 



OPTIONAL 

COMPANY AFFILIATION 



PLEASE CHARGE MY CREDIT CARD. 

D MASTER CHARGE G BANK AMERICARD VISA 

CARD NO 

EXPIRATION DATE 

PRINT EXACT NAME 

OF CARD HOLDER 



Item 



Quantity 



Price 



INTENOED APPLICATION 



SIGNATURE 



Subtotal 

Calif. Res. add 6% sales tax 

Per- Unit Shipping and Handling 

($5.00 UPS - $7.50 UPS Btue) 

Total 



532 



The Vitta Computer Company 1401 Borchard Street • Santa Ana, California 92705 • 714/953-0523 ^65 
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CLUBftf 

h\/ Rocc \A/irth ^^ ^^ 



by Ross Wirth 



"Someone recently 

estimated that there was a 

backlog of $200 billion . . . 

in software projects. " 



Anew Pascal special interest group is being 
formed this month. The coordinator is 
Richard J. Bonneau, PhD (6 Tanglewood Dr., 
Shrewsbury, MA 01545). Richard is a comput- 
er software consultant and feels more people 
should be made aware of the potential benefits 
of higher-order languages. If you have an inter- 
est in Pascal pass your thoughts and ideas along 
to Richard. 

Do the FORTRAN, FORTH. COBOL and 
LISP users out there desire a special interest 
group for their language? All it takes is one per- 
son to take the lead and serve as the coor- 
dinator. 

Business Special Interest Group 

A local business group is forming in the cen- 
tral coast area of California. The local coordi- 
nator is John J. Duemler (128 S. Elm St., Ar- 
royo Grande, CA 93420). John works for H&R 
Block and has written and is using data process- 
ing and payroll programs in three H&R Block 
offices. He is currently planning to write a pro- 
gram to check tax returns (a natural). If you use 
a TRS-80 for business and desire to meet fellow 
users, you can call John at (805) 489-1414. 

Education Special Interest Group 

George Christoph is forming a special inter- 
est group for the exchange of information on 
computers in education. George teaches com- 
puter programming in a Cincinnati Junior 
High School (using seven TRS-80's) and BA- 
SIC programming in the local community edu- 
cation program. The first Information Process- 
ing Tournament, held in Ohio in 1974, was 
sponsored by George. To contact George 
Christoph write to him at Finneytown Junior 
High School, 8916 Fontainebleau Terrace, Cin- 
cinnati, OH 45231. 

And don't forget about the High School Sci- 
ence Special Interest Group (Richard A. Mar- 
ble, c/o Casady School, Box 20390, Oklahoma 
City, OK 73156). 

Amateur Radio Operators' Group 

If you are a ham, interested in the TRS-80 
this new group may be just for you. For infor- 
mation contact Sam Martinez N3SM, 625 
Kingston Road, Middle River, MD 21220. 

Getting Behind? 

Someone recently estimated that there was a 
backlog of $200 billion (that's right, billion) in 
software projects. Are you among all the others 
waiting for the "right" program to be devel- 
oped? If you do not have the expertise to devel- 
op the software yourself and do not want to pay 
the full price for a custom program, there is still 
hope. Offer a free-lance programmer the mar- 



keting rights to the programs he writes for you. 
1 often do this for clients and it benefits every- 
one. The programmer gets a little something 
right away and the possibility of a later profit, 
if he does a good job. You, the customer, get a 
program to your specifications. The public also 
gets another program to choose from. 

Programming Hint 

To disable the BREAK key in NEWDOS use 
the following BASIC statement in your pro- 
gram: 



POkb2M6I.U 

To reactivate the BREAK, you should PEEK 
the contents of 23461 into a temporary variable 
before POKEing 0, and then use another 
POKE to replace the original value when you 
want the BREAK enabled. 

I am always happy to hear from you. Please 
send your comments to me at 15906 E. % St. 
N., Owasso, OK 74055. Please include a self- 
addressed stamped envelope for personal 
replies. ■ 



unumitedSO' 



by Sherry Smythe 



Recently, I was given the red carpet treat- 
ment by Radio Shack while visiting the 
Tandy Towers in beautiful downtown Fort 
Worth, Texas, where the West begins. 

It's hard not to be impressed by one of the 
world's nicest private subway systems, a Tandy 
Center free service given to the residents of Fort 
Worth. The end of the line takes you to a mall 
whose center attraction is a large ice skating 
rink with all the trimmings — beautifully cos- 
tumed skaters and their pupils. 

Upstairs, about seventeen floors higher, are 
Tandy's corporate offices paneled with oak, 
offering breathtaking panoramic views of the 
city. 

Tight Security 

About ten minutes away, amid tight security, 
in what used to be a J. C. Penney's store and 
later a Motorola factory, is now a Tandy manu- 
facturing plant, assembling TRS-80 Model l's 
and Il's. Inside, in the austere waiting room, 
visitors sign in, receive passes and wait for a 
tour escort. Mr. Nishikawa conducted our 
tour. 

Everywhere you look Model Il's are in all 
stages of completion. Much of the sub assem- 
bly work is done in the orient, and many of the 
raw materials for this assembly come from 
other Tandy enterprises. The assembly line in 
Fort Worth is a narrow track that winds its way 
through the room. Each computer rests on a 
flat car that rolls along until the Model II is ful- 
ly assembled and packed. Quality is controlled 
by a machine that can pinpoint any short on a 
board and reject it, if it is not perfect. Fvery 



Model II has two burn-in periods. One is under 
normal conditions for 24 hours and the other 
under extremes of heat and projected user 
abuse. 

In a smaller area of the same building, Model 
l's are constructed. Only the keyboard-CPU 
unit is assembled in Fort Worth. But quality is 
controlled in every step of the production. 

Mr. Nishikawa keeps his employees com- 
petitive within the organization by recording 
the progress of various construction stages on a 
series of five or six TRS-80's mounted in the 
wall. Each displays the performance records of 
the departments and the daily percentage com- 
pleted of their assigned goals. 

The number of rejected units is shown and 
teams of employees endeavor to keep their re- 
ject scores low and their daily output high. 

Upgrading 

One part of the Model 1 assembly area is 
dedicated to upgrading the machines. Every- 
thing from new chips to new keyboards are in- 
stalled. 

Repairs are performed in another area with 
special diagnostic equipment that tells the 
operator just what's wrong and in most cases 
how to fix it. Spooky! Computers fixing com- 
puters. 

John Roach assured me that Radio Shack is 
planning to maintain support on all existing 
computers, even though new and more exotic 
equipment is now being developed to hit the 
marketplace in late summer or early fall. And 
witnessing the thousands of computers being 
cranked along the assembly line, I believe it. ■ 
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Tfts-eo use as mm I r 

WEVE DONE IT AGAIN! MORE QUALITY ACCESSORIES 
STARTING WITH TSHORT+ ! LVII & DOS SUPER SHORTHAND. 




rtf/NOW! WEB'S FAMOUS TSHORT"- EXPANDS 1 



SAVE MORE TIME 



THAN EVER... 
TYPING PROGRAMS 
WITH TSHORT+ M ! 

Look at these new Features: 

• NOW 41 preprogrammed LV II and DOS 
statement keys. 

• NOW 11 "SAVEABLE KUSTOM keys Ten 
1 0-character and one 64-character 

• NOW includes automatic keyboard 
DEBOUNCE and AUTO REPEAT 

• NOW RELOCATABLE Less than 1 K rjytes ot 
machine language in low or high memory 

• NOW Available on formatted DISKETTES tor 
2 or more drives Comes on cassette tor LV II 
and single disk drives 

• Hold "SHIFT" or "CLEAR ' and press de- 
sired key — entire statement is typed on 




TRS-80 Keyboard with decais installed 

screen Installed ' CRTL" key can substitute 
tor "SHIFT" 

• Complete decal set (see picture) included for 
both LV II and DOS systems 

• Features self-entering commands i e 
CONT. GOTO10. KUSTOM 

• Automatic Close Paren ")' may be pro- 
grammed m KUSTOM 



TSHORT 4- cassette 
ml instruction manual . 

TSHORT + tormatted 
DISK version * manual 



$ 19.95 
$ 24.95 




|*4l 




Controller 



TSEL™ 

We'll convert YOUR IBM Selectrlc I or II to a 
high quality letter printer, totally compatible 
with your TRS-80. 

• MP control — 512 character butler 

• Special TRS-80 cable with custom Pause 

Reset switches Our optional Y cable 
allows it to be plugged in with other printers 

• A superior word processing system 

• Compatible with Electric Penal™or Radio 
Shack s Scripsit"' 1 Patches or modifications 
not required 

• Completely tested and ready to LPRINT 
TSEL (cleaning and minor 

service included) $795.00 

(Options and shipping extra — call or write for 
special shipping instructions) 
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TBEEP 1 ™ 

For Level II and Disk Users — A sei* 

contamed audio alert beeper with d pager- like 
tone Plugs m-hne with AUX cable from your 
x RS-80 i Requires 9V Battery $ 19.95 



TMEM™ 

Now, the best of both worlds) A battery sup- 
ported memory giving you READ/WRITE 
capability with ROM security! 

• Use for retaining important totals/variables 
utility/system software (i e TSHORT. TLEC). 
development programs, monitors, etc 

• User programmable Write enable switch ♦ 
OUT statement ensures memory security 

• External plug-in module Available in either 
1K or 2K ADDR 3000 to 37 Hex 

• Retains memory contents on power down or 
failure for 2 weeks or more Built-m Batteries 
recharge automatically 

• Instant access to memory contents upon 
power up 

• Uses unassigned area ot memory No 
conflicts with other operating software 

• Compatible with either LV II or Disk Operating 
System (Special cable required for LV II) 
TMEM w/1K $124.95 



TMEM w/2K 



$174.95 
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TPAK™ 

The best cassette tapes money can buy — 

AGFA 61 1 We use them tor our production 
software, such as TSHORT™ Pack of 10 C- 10 
blank tape cassettes, boxes, and blank labels 
$ 12.95 



TBEEP 2' M 

A TBEEP kit you install inside your TRS-80 

keyboard. 

• Completely assembled and tested 

• Attach to keyboard s PC board with double- 
sided foam tape (included) and solder three 
wires to easily located points on keyboard 
unit Installs in minutes 

• Uses power from your TRS-80 No battery 
required 

• DEALERSI Install when modifying your cus- 
tomer s TRS-80. and include TBEEP s simple 
four word BASIC command in your off the 
shelf Software 

~BEEP 2 Kit (with complete 

instructions) $ 12.95 



Puts your IBM MOD 50. 60. 

75 a step ahead 

New concept 

New features, benefits 

Simply plug into printer port 

No printer software reqi " 

Low cost 



s? 
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STAND ALONE INTELLIGENT 
PRINTER CONTROLLER 



STANDARD FEATURES: 

• /ip CONTROLLED (Z80) 

• 256 CMTR BUFFER 
•DOWNLINE COMMANDS 



COMMANDS: 

• JUSTIFY 

• PROPORTIONAL 
SPACING 



SEND YOUR NAME & ADDRESS FOR 
V MORE INFORMATION AS AVAILABLE 



TBASE™/TCHAIN' M 

2 powerful winners coming up Watcn our ads 
for release 



TBUFF — OLD FAITHFULL 

Stop your cassette when it should with our 
TBUFF cassette interface butter 



(Specify recorder make & model 



$ 9.98 



Telephone Orders: 
(714) 559-6249 

PLEASE NOTE All WEB Associates products p 
are designed to work with Level II and Disk 
Operating Systems unless specified otherwise 



Send Check or Money Order to: 

WEB ASSOCIATES "» 

O. Box 60 QF, Monrovia, CA 9101 
(California Residents add 6% tax) 



DEALER INQUIRIES INVITED 
UPS/C.O.D. - ADD $3.00 

FOREIGN ORDERS 
Add 20% ($10 maximum) 



gO NEWS 



by Nancy Robertson 



Radio Shack Support 
Of Computer Products 



According to statements made by company 
President Lewis Komfeld in a recent press re- 
lease. Radio Shack is offering wider support of 
their computer products. Computer leasing has 
been available since January. Computer centers 
have been opened in the SO major markets and 
on-site service is an option to carry-in service. 

Komfeld states that the computer centers 
each incorporate "a full servicing facility, as 
well as a classroom, stockroom, sales room and 
display area." 

Charlie Philips, company vice president, ex- 
plains that, theoretically, each computer center 
has an instructor and a technician on the pay- 
roll. Courses are offered in the basics of com- 
puting. Customers are offered advice on devis- 
ing a system of hardware and peripherals that is 
best for their specific needs. 

The on-site service contract will bring a re- 
pairman to your door. To maintain and repair 
the equipment after the warranty lapses, con- 
tracts may be purchased for limited or unlim- 
ited on-site service for the Model II. This op- 
tion is generally available for Model II service 
only. If you own a bevy of TRS-80 Model l's, it 
may also be possible to contract for the service. 

Contracts and costs for on-site repairs vary 




TRS-80 Model II 



from system to system. According to Philips, 
the most common form of the limited service 
agreement provides an installation visit, one 
preventative maintenance call and two remedial 
calls for $500 within a 50 mile zone of the ser- 
vice center. 

Further information on leasing and on-site 
service contracts is available from computer 
centers and from company owned RS stores. 
Check with dealers as well. Computers centers 
may be located through the yellow pages or di- 
rectory assistance in large urban areas. Local 
Radio Shack owned stores can direct rural resi- 
dents to the center nearest them.B 



Three Software Utilities 



There is another editing tool on the market. 
This one. Packer, is sold by Cottage Software, 
614 N. Harding, Wichita, KS 67208. Using five 
options, Packer helps save memory and time. It 
is one of three new releases from Cottage Soft- 
ware. 

Packer is written in machine language, and is 
supplied on two tape cassettes in three versions, 
one each for 16K, 32K and 48K for Level II or 
Disk BASIC. Packer is sold with an instruction 
manual for $29.95. It works with the following 
commands: 

UNPACK unpacks multiple statement BA- 
SIC lines into single statement lines while main- 
taining program logic. It also inserts spaces for 
easy reading and editing. You select the starting 
and ending line numbers, or unpack the entire 
program. 

SHORT removes unnecesary words (eg. 
LET, GOTO after THEN or ELSE), spaces, 
and remark statements to shorten program 



length. Again, you can specify starting and 
ending line numbers. 

PACK performs UNPACK then SHORT. 
Next it packs lines into multiple statements up 
to the maximum length you specify. It main- 
tains complete program logic, including IF/ 
THEN/ELSE statements, branches, etc. You 
can PACK the entire program or just sections 
of it. 

RENUM renumbers your BASIC program 
lines including all branch references, such as 
GOTO, GOSUB, etc. You may input the first 
line number to be changed, the new line num- 
ber and the increment for all subsequent lines to 
the end of the program. 

MOVE moves any number of program lines 
to any new location in your program, and 
changes all branch references to the new line 
number. 

Cottage Software's Disassembler disassem- 
bles Z-80 object code into Zilog mnemonics 
and shows ASCII Strings during disassembly. 

With the MEMORY DISPLAY/MODIFY 
routine you can see the contents of 256 bytes of 



memory at one time in either hex or ASCII . You 
can modify the contents of RAM from the key- 
board. STRING SEARCH searches through 
memory for a string of object codes to find sub- 
routine calls, compares, register loads, etc. 
With READ/WRITE OBJECT TAPE you can 
read an object tape into memory for disassem- 
bly or modification, and then make a copy on 
tape of any part of ROM or RAM. 

A program written in BASIC that edits Dis- 
assembler for use on a line printer and a pro- 
gram that allows loading and inspection of any 
TRS-80 500 baud tape are included in the pack- 
age which costs $19.95. 

System Tape Duplicator, another Cottage 
Software product, duplicates machine lan- 
guage tapes. Programs recorded on your own 
equipment normally load more easily, as the 
folks at Cottage Software point out. This item 
sells for $12.95. 
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Machine Code Disassembler 



Datagraphics, P.O. Box 566 Union Station, 
Endicott, NY 13760, is selling Disassembler-80. 
This software disassembles ROM or RAM, and 
has selectable output to either video display or a 
printer. It prints standard Z-80 mnemonics, 
with decoded data and addresses, in an easily 
readable format. Disassembler-80 handles all 
legal code combinations and traps illegal codes. 

It provides an aid to assembly language pro- 
grammers and is an educational tool for anyone 
interested in learning the workings of the Z-80 
microprocessor. The package is supplied on 
tape for 16K Level II with optional line printer 
and is disk compatible. It costs $9.95 for the 
Model Lit has just become available for Model 
II, as well. 
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Products Stretch 
Memory of Models I & II 



For the Model I TRS-80, Vista Computer 
Co., 1401 Borchard St., Santa Ana, CA 92705, 
offers the V-80 Disk Drive System. Available in 
one-, two-, and four-drive configurations, the 
V-80 is a 40-track system which provides I02K 
bytes per drive. Track-to-track access time for 
the V-80 is 12ms compared to 40ms for the 
TRS-80. 

A program patch, supplied at no charge by 
Vista, will adapt your TRSDOS disk operating 
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system to accommodate the 40-track drives and 
faster access times. Patches are available for all 
existing versions of TRSDOS. Cables are avail- 
able for two and four drives. 

Another Vista product, the VXM-80 Expan- 
sion Module, operates with the TRS-80 expan- 
sion interface to provide double density stor- 
age. In other words, total storage on a 40-track 
diskette can be increased from 102K to 204K 
bytes. VXM is priced at $239, including all 
hardware and software. 

Beware: The VXM-80 is designed for use 
with Vista's V-80 Disk Drives, and Vista docs 
not guarantee its operation in double-density 
format with TRS-80 drives. 

Vista also offers Model II Disk Expansion 
System, which is available with up to three 
eight-inch, 77-track disk drives. A three-drive 
system can add 1 .5 Mbytes of storage to your 
Model II TRS-80, giving the system a total of 
up to 2 Mbytes of on-line disk storage. Vista's 
Model II is fully compatible with the TRS-80 
Model II, and plugs directly into one of the ex- 
pansion connectors on the TRS-80. 

The single-drive expansion system lists for 
$1000, the two-drive for $1550, the three-drive 
for $2100 and additional drives for $525. Vista 
products carry a 120-day warranty which 
covers both parts and labor. 
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Level II Data Management 



A data management utility for the TRS-80 
Level II 32K. TRSDOS or NEWDOS, is avail- 
able from Standard Systems Corp., Marketing 
Department, 2421 Tanglewood Road, Decatur, 
GA 30033. 

The program, which is written in Disk BA- 
SIC, is called Customized Record Inquiry/Edit 
System (CRIES). It is menu managed for key- 
indexed records. 

Naturally, the program will EDIT, ADD and 
DELETE records. It will allow listing of record 
keys, searching by examples and merging of 
disk selected portions. 

The disk package contains CRIES, DOS 
command file, documentation and sample data 
files for $45. 
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Create and Compile 
Graphics and Animation 



Electra Sketch is an animation and graphics 
compiler which is available from Macrotronics, 
1 125 N. Golden State Blvd., Suite G, Turlock, 
CA 95380. 

Macrotronics explains Electra Sketch will let 
you create your own movie sequence or com- 
bine graphics and plain text to create anima- 
tion. 

Electra Sketch works with one-key com- 
mands to control cursor direction, erase, draw 
vectors, fin in backgrounds, or aeate titles. 
Frames are saved on disk, can be recalled, 
edited and printed on a line printer. 



Saved frames are animated by displaying 
them in either forward or reverse sequence. The 
speed of the animation can be changed in 10 
increments from slow motion to rapid play. 

Macrotronics is charging $14.95 for Electra 
Sketch. A catalog of 30 Macrotronics products 
is available without charge. 
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Examples of Elect ra Sketch graphics 

Series 8000 Medical & 
Dental Management Systems 

The Series 8000 Medical and Dental Manage- 
ment Systems for the TRS-80 Model II (and 
most other 32K CP/M disk based microcom- 
puters) upgrades L'nivair, Inc.'s early version 
of the package. 

Among other things, the new features in- 
clude automatic display and computation of 
normal office charges, improved patient sched- 
uling routines, alphanumeric patient sorting 
and archiving, provisions to link special user- 
developed programs into the main menu, and 
detailed operators manuals. 

Series 8000 Medical/Dental Systems are on 
sale from Univair, Inc., 10327 Lambert Int. 
Airport, St. Louis. MO 63145 for $495 each. 
The price includes telephone consultations on 
initial set-up. Series 2000 owners may upgrade 
their systems at a cost of $ 100 and will receive a 
new six-month warranty. Operators manuals 
may be bought separately for $15. 
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Accounts Receivable/ 
Invoicing for Model II 



Accounts Receivable/Invoicing System for 
the TRS-80 Model II is available from laranto 
& Ass., Inc. The package design is the result of 
users' experience with Taranto's Model I con- 
version of the Osborne/McGraw-Hill Ac- 
counts Receivable book, and has also been ex- 
panded to include an invoice program. 

Customer and invoice files are key controlled 
for quick access. Up to 51 items may be billed 
on a single invoice. Both invoices and state- 
ments are printed. Package users define sales 
tax rates as they apply to each customer. Cus- 
tomer service charge rates are also defined by 
users. These functions are then computed as 
they apply. 

The package generates reports which list in- 
voices that have not been billed, open items, 
closed items, and an analysis of age and open 
items. 

Osborne/McGraw-Hill's Accounts Payable/ 
Accounts Receivable Wang Book documents 
much of the package and must be used in con- 
junction with it. Both the book and the package 
are available from Taranto & Ass., Inc., Box 
6073, 4136 Redwood Hwy., San Rafael, CA 
94903. The book costs $20. Accounts Receiv- 
able/Invoicing System costs S249.95. 

Reader Service ^ 162. 



Data Base Management 



IDM-M2, an interactive data manager for 
the TRS-80 Model II, provides a general pur- 
pose approach to data base management. Mi- 
cro Architect, who produces IDM-M2, sug- 
gests that it allows many applications for users 
without the technical knowledge required by 
most data base programs. 

The package is a conversion of 1DM-IV lor 
the Model I with additions. It includes two 
levels of security, up to 40 fields, search com- 
mand, statistics and error trapping. Hie report 
generator has optional column justification, 
dating and automatic paging and a record selec- 
tion range. The report writer includes field ad- 
dition and subtraction, and operators lor filter 
criteria, field updates, record deletion and a 
display format for records. 

IDM-M2 is written in BASIC. It requires 
64K memory. The package is priced at $199 and 
is sold by Micro Architect, 96 Dothan St., Ar- 
lington, MA 02174. Demonstrations can be ar- 
ranged. 

Reader Service is 176. 



32K Expansion Interface 



An expansion interface for the TRS-80 called 
Model LX80 is available from Lobo Drives Int. 
It expands memory capacity up to 40 million 
bytes, or 32K of RAM. 

A switch permits overriding the keyboard 
ROM for booting in diagnostics and custom- 



■ Reader Service — see page 162 
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ized operating systems. Connectors for the 5.25 
and eight-inch floppy disk drives and other pe- 
ripheral devices are located on the side and rear 
panels. 

Other features include a parallel Centronics 
printer port; a port for the Lobo Drives Model 
7710T Winchester hard disk drives, a screen 
printer port, two microprocessor-controlled bi- 
directional serial ports and a crystal controlled 
real time clock. 

The interface is sold by Lobo Drives Int., 
5082 Shirley Drive, l.aPalma, CA 90623 for 
$525. Dealer discounts are available. 

Reader Service *<» 1 7K. 




Lobo Drives' Expansion Interface. 



Nevada COBOL for TRS-80s 



Business Microproducls. I.ivermore Finan- 
cial Center, 1838 Catalina Ct., I.ivermore, CA 
94550, has the Nevada COBOL compiler avail- 
able for the TRS-80 Model 1 and II. The com- 
piler has been running for one year under 
PTDOS and was converted to CP M in 1979. It 
has been relocated to 4200H for the Model I. 
while the Model II works with the standard 
CP/M. 

Nevada COBOL by Ellis Computing was de- 
signed specifically for small businesses using 
microprocessors. It quickly translates source 
language programs into machine language pro- 
grams and is simple to use. 

The compiler is a subset of ANSI-74 and in- 
cludes random access file support, both fixed 
and variable length sequential files, debugging 
capability, copy statement, character string, 
16-bit binary and packed decimal (COMP-3) 
data types, 1 8-digit accuracy, hexadecimal non- 
numeric literals, English language error mes- 
sages and interactive ACCEPT DISPLAY. 

Nevada COBOL requires I6K RAM. two 
five-inch single density drives, or one eight-inch 
single density drive. 

Including a run time package, sample 
COBOL program and terminal configuration 
program, the compiler is supplied on a CP'M 
data diskette. The cost, including a manual, is 
$99. Documentation is available separately for 
$25. 

Reader Service *•* 166. 



Software for Dentists 



Dentalware, a package combining patient 
treatment plans with patient billing, is being 
.sold by Caldata Systems, P.O. Box 178446, 
San Diego, CA 92117. Caldata explains that 



"complete word processing capability" is 
thrown into the bargain. 

Besides keeping track of past and planned 
treatment for each patient, the package can 
take care of all patient accounts. Fees are set by 
the package user, then the package will issue 
itemized statements and tally balances. Dental- 
ware can also be used to fill and file insurance 
forms. 

Designed for the Model II. the complete 
package costs $2600. (From what Caldata says, 
you get the impression that pulling teeth will be 
just about the only thing left for the dental staff 
to do.) The instruction manual may be pur- 
chased separately for $35. The word processor. 
Word Magic II. costs $100 when purchased 
separately. 

Reader Service ** 181. 



Electric Pencil Products 



Several new Electric Pencil products are 
available from Michael Shrayer Software, Inc., 
1198 Los Robles Drive, Palm Springs. CA 
92262. 

The Electric Pencil II is being shipped for 
TRS-80 Model II users who have CP/M. It is 
available with three print packages: 
Standard Print Package runs with serial or par- 
allel interfaced printers. It costs $275. 
Diablo/Qume Print Package works with serial 
versions of the Diablo and Qume Micro Sprint 
5 printers. It is priced at $300. 
NEC Print Package works with serial interface 
NEC's only. The price is $300. 

All these packages contain fractional charac- 
ter spacing (pseudo proportional), bidirectional 
printing, boldface and automatic negative line- 
feeds. 

The TRS-80 Model II TRSDOS version of 
the Electric Pencil II for non CP/M users is 
also available. Additional features in this ver- 
sion are word left, word right, word delete and 
page numbering at the bottom. 

Standard Printer Package retails for $325 
and the Diablo/Qume/NEC Printer Packages 
retail for $350. The company makes no up- 
grades or exchanges between CP/M Model II 
and TRSDOS versions. 

Convert is a conversion utility program 
which converts file*, created by the Electric Pen- 
cil II to CP M. Files may be created in assem- 
bl\ language. BASIC, Fortran, etc., using the 
Electric Pencil and then converted into CP/M 
files for further processing. Convert is available 
for $35. 

Reader Service v 167. 



Personal Finance Package 



Investment Portfolio System, a data base 
management program with a broad range of 
applications, is available from Personal Fi- 
nance Systems, 1446 Durham Rd., Madison 
CT 06443. 

The program will store and report data on as 
many as 72 securities and review items in the 
portfolio by price, yield, percent gain or loss. It 



provides four special reports: complete sum- 
mary data on the portfolio; current value and 
return; long and short term gain and a security 
analysis report. This latter report provides in- 
formation about return on investment, annual- 
ized yield and earnings and yield gain compared 
to market index. 

Personal Finance Systems is developing 
other data base management programs, which 
will record sales as well as purchases, issue tax 
reports and Security Exchange Commission re- 
ports and update the data base via a telephone 
modem. 

Investment Portfolio System is available in a 
disk version for TRS-80 32K LI I single drive 
computers, and in a tape version for I6K Lll. 
Both programs arc supplied on a single tape. 
The package, including documentation, costs 
$39.95. Documentation is available separately 
for $7.50. 

Reader Service • 165. 
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Sample Rain on value reports 



Mediamix Typesetter 



Mediamix, PO Box 8775, Universal City, 
CA 91608, is selling PSRJ + 2.0 for use with 
their IBM Model 50 Typewriter/TRS-80 Inter- 
face. This machine language program prints 
out an Electric Pencil text file (or any ASCII 
file) using the IBM 50's proportional spacing 
type elements, with full right justification. 

The user can imbed codes in the text for cen- 
tering of titles, indenting paragraphs, underlin- 
ing, typing special characters and pauses during 
printing to allow changing type fonls for titles, 
italics, etc. 

Reader Service ** 174. 
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The Game 
Of Life 




Dennis Bathory Kitsz 
Roxbury, VT 



Classic among challenges in computer 
programming is the Game of Life, con- 
ceived and developed in the early 1970s by 
British mathematician John Conway. Life is 
not exactly a game, it is more than a pastime, 
and most of all, it is a stunning display of video 
graphics for the TRS-80. 

The Game of Life is based on a few very simple 
rules. A universe of beings is created to live, give 
birth, and die. An infinite, random universe of these 
beings would be most interesting. On the other hand, 
a limited, regularly-ordered universe is the only reason- 
able way Life can be programmed on a computer, particu- 
larly on a computer of the TRS-80's size. 

Conway's original universe consisted of a regular grid. Any 
being on this grid is surrounded by eight immediate neighbors. 
Conway provided only three rules to determine the fate of these be- 
ings. 

1. A potential being, surrounded by three, and only three, immediate 
neighbors, is given birth. 

2. A being, once born, stays alive if bordered by two or three such immediate 
neighbors. With less than two, it dies of loneliness; with more than three, it succumbs 
to overpopulation. 

3. Every generation of births and deaths is commanded simultaneously. 
This is an ideal computer problem: Examine the current occupancy of each grid location, check the 

number of its neighbors, and readjust the grid next time around. 

What follows is an assembly listing of the Life program itself, as well as a BASIC listing of a program for generating 
"seed" populations. I call it Playing "God" with Life. 
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Complete Assembly Code 
Listing Begins on Page 54 



About this Version 

This version of Life was created with cer- 
tain of the frustrating aspects of real life in 
mind. In the beginning, when the screen 
clears and the introductory text is presented, 
a long delay ensues. Each letter appears sep- 
arately, and the text builds on the screen. The 
machine is taken from the hands of the user 
until the text is complete, and, even then, will ac- 
cept only the requested input, with no help from 
the ENTER or BREAK keys. 
Take a look at the actions of the program a step 
at a time. The assembly program, Listing 7. gives a 
loading message to the user starting at line 240. The 
following statement is displayed: 



LOADING LIFE9 • • ' WAIT FOR GOOD LOAD 



THEN ENTER V 



Notice, also, that a GOOD LOAD message con- 
cludes the process (line 6740), in order to offer a measure of as- 
surance that the program made it. 

The first action of the Life machine program is at line 5190. These 

instructions transfer the opening monologue to the screen a character 

at a time. A call to a screen-clearing subroutine is made, which is held for a 

few seconds. At that point, the first two lines of text are displayed, followed by 

the introductory sentences. 

During this time (approximately 15 seconds), the keyboard is disabled, and the user 

is forced to summon patience. A final delay holds the message on the screen, followed by 

"another clearing of the monitor. The starting address of BASIC'S "USR" call is put in place (line 

5860), and the user is presented with a message that asks whether a count of the passing generations 

is desired; the keyboard is scanned for a or a 1. 

Another delay is ended by a "return to BASIC" message. When the user enters a zero (the program responds only to 

this character), the machine is returned to Level II BASIC control. The main Life pro- continued to page 44 
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In the Game of Life, the pattern of growth 
should be fluid -although for theoreti- 
cal purposes, this fluidity is not impor- 
tant - the beauty of the changes is often 
the most important reason for programm 
ing Life. But the larger the grid of beings, 
the slower these changes can be calculat- 
ed by the computer. 

A small (and certainly uninteresting) 
total universe of four cells by four cells 
demands 16 checks on each cell and its 
eight neighbors, or 144 examinations in 
all A 20 by 20 grid is still small, hardly two 
square inches on the video monitor, but 
demands about 3.600 distinct cell checks. 

The TRS-80 video graphics system of- 
fers an irresistible arrangement of 48 cells 
doop by 128 cells wide -6,144 in all. For 
that large a grid, over 55.000 cell examina- 
tions have to be made to complete each 



generation. 

After that introduction, the game may 
sound like a dry process, but the screen 
patterns produced are beautiful designs 
that are often referred to by names such 
as gliders, ponds, space ships, flashers, 
traffic lights, and by more poetic terms 
such as civilizations, gypsy troupes, 
marauding bands, hermits, and so forth. 
Take a look at the first series of photo- 
graphs. 1-6. 

A simple group of seven beings formed 
in the shape of an arch (sometimes called 
pi) develops over the course of 1 73 genera 
tions, producing fascinating symmetrical 
patterns. Through its life, this civilization 
grows larger. 

One interesting pattern, dubbed a glider 
in Conway's original description, is 
among the group of pentominoes, or pat- 



terns built from five characters. The glider 
goes through a few permutations, eventu- 
ally cloning itself after four generations, 
but moves in an angular path with each 
self duplication See photos A-D. 

Another of the familiar Life patterns is 
the spaceship, photos E-H, which repli 
cates itself in four generations as well, but 
appears in mirror image every two genera- 
tions. 

The tall bar presented in photos 7-13 
reaches stability much earlier, but during 
that time offers dozens of designs remi- 
niscent of art deco. or. at the very least. 
like an old Wurlitzer juke box! 

The third series of photos. 14-6. shows 
three points in the long life of a random in- 
itial population, which reaches stability 
only after hundreds of generations. Some 
random patterns will continue for thou 
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Photos 1-6: The Life of the arch pentomino. at birth; generations 18, 90, 113, 159, and 
stability at generation 173. 

Photos 7- 13: A tall bar created of several hundred cells, at birth: generations 1, 2, 3, 4, 
12, and stability at generation 31. 

Photos A-D: Lite cycle of two "gliders". The glider returns to its original configura- 
tion at a new position in four generations. 

Photos E-H: Life cycle of the "spaceship". Like the glider, this figure returns to its 
original configuration in four generations. 



Photos by Dennis KHtz 
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sands of generations, as a small group of 
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grammed in BASIC (Listing 1). Each gener- 
ation of blocks takes two minutes and 10 
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Program Listing 3. Screen white-out 




You can create and destroy at will, but 


seconds, the second, in 10 seconds: and 


using POKE commands. 




to change the master plan is beyond your 


the third, fastest of the BASIC options. In 






power We can only observe as the gener- 


two seconds. Now, enter the program In 








ations march by, suspending tune to save 
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develop a Game of Life that makes meta- 
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by Dennis Kitsz 
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Program Listing b. Screen white-out 
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Photos 14-16: A large random 






300 FOR X 15360 TO 16383 






universe, at birth; at generation 306. 






310 J ■ RND(7) IF J 1 IMLN POKE X.191 
320 NEXT X 
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Program Listing 1. Simplified Life in BASIC 
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for the TRS-80 from Micro- IVIega 



CASSETTE CONTROL UNIT 

• Speed up your cettette l«p» handling • Pinpoint program locations on tape with an audible monitor • 

Get protection from recording and playback gtltchet resulting ttom ground loopt • Eliminate the tedious 

plugging and unplugging of recorder cablet 

The Micro Mega Cassette Control Unit dots til inn ana more Vou got mi ttnt 

manual control of the recorder at the tiica ol a twitch Want to Imd the 

brgmning oi and ol a program ' fuck another twitch and you n hear it An 

cablet remain plugged in all the MM 

rn» Micro Mege C.ttsette Control Unit does a lot 10 improva lha appear 

ance ol youi IRSao Syttem, too At shown, it s m a ••»' ■ 5 N" axUH h 

tnuggiet between the keyboard and your recorder There it no need to 

more the recorder and all cablet come neatly into the unit lha t'ai telle 

Control Unit it tailored to the CTR4I re e erdet. but may be need with motl 

other recoroert at well 




CASSETTE CONTROL UNIT 

Add $1.00 lor postage and handling 



$37.95 



CPU MONITOR 

( »•< lind you'tell with a blent tcreen wondering what your computer it up to'' the Micro Mega CPU Monitor 

ran leu you. lor eitmple • If youi CPU it in a loop wllh no fit • When t long toil it hearing completion 

or • II t key bouncet during keyboard input the CPU Monitor lett you htlen to ell CSA Hi and CI OAOt 

and will help you Quietly Imd the correct recor d er volume telling II you here en etpentton interlace, you 

will etwayt tnow whether the real lime clock it on or oil beceute you can hear it 

the Mil/o Mega CPU Monitor greet a twee to the / m mrcroprocettor m 

your TRS aO by vting AM radio circuitry W pM up lha computational 

rhythm* ni the CPU. which are amplilied and played through a loudspeaker 

the pictup unit ol the CPU Monitor, thown at tell m the photo goet under 

tout TRS aO keyboard it it connected by a 36" cable to the tpeeker and 

control unit, which includes an on/oft volume control and an LEO "power 

on" indicator The Monitor it powered by an AC adapter thown at tight M 

the photo No battenes are needed and no electrical connectiont to your 

IRSaO are required 

By listening to the CPU Monitor, you wilt toon become lamiliar with the "personalities " ol the programs you 

run and whether they are otecutmg in a normal way A dramatic use ol the CPU Monrtor it in the greet 

enhancement which it provides tor computer garnet iSee "Gaming I mironment below I 

CPU MONITOR Ul 95 

Add $2.00 lor postage and handling 

THE GREEN-SCREEN 





the eye pleating Green Screen tilt oyer the CRT ol you' 'PS 90 u m»o Display and giyet you improved con 

trast with reduced glare Vou get bright, luminous green characters and graphics like thote featured by very 

ttpentrve CRT units 

The Green Screen it clotely matched to the color and tenure ol the TRSSO 

Video Ditplay and improves the overall appearance nl your system II is at 

Itched with adhesive il'iju. which do not mar your display unit in any way 

The Mrcro Mega Green Screen grves impioved ndeo ditrHey visibility lor an 

applications and is etpecielly effective m creating dremeln. high impact 

displays lot computer gemes iSee 'Gaming Environment below i 

THE GREEN-SCREEN $13 95 

Add St 00 lor postage and handling 

THE ULTIMATE STAR TREK PACKAGE 

Tired ol trivial computer games' 'hit complete Sler Trek package will provide you with endless lascmai-on 
and challenge In addition to the program cassette it mciudet compiehennvt instructions a pad ol 

Voyage log record sheets and a tree-standing 'Torpedo and Maneuvering Chart " 
The package n built around the latest version o' ' 

parable Stai Trek in. a 13.000 byte program with t host ol subtle and imag- 
inative features which include numerous dynamic and spectaculai graphic 
display! Star Trek III puts you In command ol the Enterprise cruising in a 
gala 1 1 oi tl? quadrants lined wilh uncharted haiardt. including hottile I 

pulsars and black holes Vou have at your disposal scanners 
various weapons and detente systems, on board computers and a loyal 
r-iew i »ou will need them all to turvrve the Kungont I 

Vour munon ii to rid the region ol Klmgons end Jo hac.ete live inhabitable planets an within 300 ttetdays 
before returning lo Star fleet Heedquarters where your overall ellectiveneit at a tterthip commander will 
be scored High scores are possible only with caretui planning and effective betue tactics The Voyage 
log' sheets will guide your strategy md the Torpedo and Maneuvering Chart will give you a vital edge in 
combat iWhen you engage three Klmgon ships you can't afford to MM | 

STAR TREK PACKAGE (lor Level II, 16K only) $22 95 

Add St 00 lor postage and handling 

CREATE YOUR OWN SPECTACULAR 
GAMING ENVI RONMENT [and ■•we S5.QO) 

the Enterprise n M battle turn with deflector shields at tun power As her captain you are taking hot »t 
combat The battle station, siren rings in your eers and "CONDITION RED Hashes on your monitor screen 
You call lor werp drive and key in the coordmaiet ol the quadrant where your scanner, have delected Klmg 
on ships As you select the warp lector you heat lha leatsuring clicking nl your navigational gear as it ac 
tivatet the warp drive 

Suddenly you break out ol hypertpaco and your monitor displays the chilling sight at three Klmgon Battle 
Cruisers floating on your screen • Their evil shapes glow in luminous gieen against the bteet void ol space 
Moments later you hewi the characteristic rasping sound of Klmgon later weapon! and. as you watch 
h,gh energy beamt come kmlmg toward the Enterprise M »ucco»«ion from each ol the Klmgon ships 

Vou have been hit' Vou hear the dismel sound of the damage control atarm as "DAMAGE TO WARP 0RIVE" 
and "DAMAGE TO PHASE RS' Hath on youi tcieen The Kimgons have slopped tirlngi The Enterprise It 
crippled, but your ben weapon is still intact, and it s your turn now 1 Vou key m the command lor photon 
torpedoes As your screen again displays the position ol the Kungon ships, you select e tiling vector trom 
your torpedo chert and key it in Now you hear the burl ol your photon torpedo at you tee it speeding rowan/ 
• Klmgon ship II strikes hrm dead center • As you watch, the Klmgon heme Cruitei disintegrates, accompe 
nied by a satislying crackling sound 

Does the above scenario sound In H HA et ft Not at an it i a small sample o' what you *,u m<n*nen<r with 
Veen Mega s Gaming Invonmem metae* COOMM of • The STAR TREK PACKAGE • "»• 
SCREENand • The CPU MONITOR The tan paced and dynamic eeuoa reliecis the tupecbSta' Treklllpro 
gram together with the Voyage Log and torpedo Chan ol Ito Si*' tret P.ck.qe An at in, umou. 
graphic displays art greatly enhanced B| ir-en finally the uncanny sound effects are pro- 

duced by the CPU Morula' which faithfully D'cki up the I OR NH T mops and oihei CPU patient 
create the distinctive men sounds that accompany the AlERT and DAMAGE mettagr- 
harsher nutti of the weepont lehrot Once you veined it. youwonlanykongeibe \ati\tirn *-m ■ 
putet garnet 

Remember the! with lha liammq tn,nuitment you alto gel til of Ihe other eneiieni tvatu-es ol lite CPU 
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From page 39 

gram has not yet been activated. 

At this point, a set of "seed" civilizations can be created. This arti- 
cle includes a BASIC listing that will create 20 seed populations. 
(See Listing 6.) 

TRS-80's video system has two kinds of blanks, represented by 
decimal values 32 (a character space) and 128 (a graphics blank). 
Both these characters appear the same to the eye, but have entirely 
different results in the Life program. When clearing the screen for 
use with Life, it is essential that character 128 (hexadecimal 80) be 
used. The following subroutine will produce the desired effect: 



10CLS 

20 FOR X = 15360 TO 16383 

30POKEX.128 

40 NEXT X 

Program Listing 8. Clears the screen before jumping to Lite. 



Now a seed population can be created on this blank field. Here is 
a section of Listing 6: 



2300 GOSUB 9999 REM " CLEARS SCREEN WITH CHAR 128 

2310 FOR X = 15817 TO 15860 

2320 POKE X.191 

2330 NEXT X 

2340 M»'. = USR(0) 



Following the screen-clearing, these lines will POKE a graphics 
pattern into place that looks like this: 




It is created from a dense bar of graphics cells, and will eventually 
follow the pattern shown in photos 18-21. Through the USR(0) com- 
mand, the program now jumps to the machine language Game of 
Life routines. 

The Action of the Program 

The first action of the program is to save the BASIC stack pointer 
(line 280). The reason for this is that the program as a whole (the seed 
program and the Life program) will be using two stacks — one for the 
video display work area, and the other for the BASIC seed programs. 

Next, the generation count is set to zero, and the upper and lower 
borders of the video workspace are blanked. This blanking is 
necessary because unwanted neighbors to cells in our real popula- 
tion may intrude upon the territory of our universe and produce mu- 
tant births. 

Now the pattern on the screen is transferred to a scratchpad, or 
workspace, elsewhere in memory. Have you ever noticed the black 
streaks that detract from the continuity of the screen display when 
graphics are being drawn? There is a very short period of time when 
the video memory circuits must be taken over by the rest of the com- 
puter system in order to place information on the video screen, or, 



less often, to read Information that is there. 

The memory Is taken out of the video scanning circuit for a very 
brief moment, so the display blanks out. The more times we need to 
dip into the video, the more black streaks there will be. In order to 
prevent our Life display from becoming a jittery mess, you can 
remove the information displayed as a block and place it elsewhere, 
whereyou can plunder it at will. The screen then remains passive un- 
til the altered block is transferred back to the monitor. 

Two very important instructions appear in lines 610 and 760. 
These commands, which appear early in the program, load values in- 
to each of the two index registers available in the Z-80 microproces- 
sor chip. In fact, without these two registers, you could not attain the 
speed of this game. 



Program Listing 6. BASIC Seed Populations 

10 CLS 

15 - SPACESHIP 

28 PRINT§468, "PLAYING GOD KITH LIFE: 
♦STARTS* 

3B P0RX-1T02BB8:NEXT 

48 PRINT'ENTER 1 FOR INSTRUCTIONS 

ENTER 2 FOR GRAPHICS CHARACTER LIST 

ENTER 3 FOR LIST OF SEED CHARACTER PROGRAMS" 

58 PRINT: INPUT'ENTER 1 , 2 OR 3", -A 

68 IFA-1GOT018B 

78 IFA-2GOTO1808 

BB IFA-3GOTO2088 

IBB CLS 

118 PRINT'PLAYING GOD WITH LIFE MUST START WITH A BASE 

CIVILIZATION CREATED BY A SEED PROGRAM. THIS PROGRAM 
USES TRS-88'S GRAPHICS CHARACTERS SET, WHICH IS 
PRESENTED A BIT LATER IN THIS PROGRAM." 

128 PRINT:PRINT"ASCII CHARACTER 128 — CHR$(128) -- IS A 
GRAPHICS BLANK. ALL THE SEED PROGRAMS FIRST CLEAR THE 
SCREEN WITH THESE BLANKS, THEN PRODUCE A STARTING 
CIVILIZATION USING THE TRS-8B GRAPHICS "; 

121 PRINT'CHARACTERS. FINALLY, THE SEED PROGRAMS JUMP INTO 
THE MACHINE LANGUAGE *LIFE* PROGRAM." 

138 PRINT: PRINT'REMEMBER, YOU MUST HAVE ALREADY ENTERED THE 
•LIFE9* SYSTEMTAPE THAT PRECEDES THIS *;CHRS(34); 
■STARTS", -CHRS (34) ;" SECTION, OR A FC ERROR7WILL BE 
GENERATED." 

14 8 FORX«1T018BBB:NEXT:CLS:GOT04B 

1888 CLS 

1818 FCRX-128T0155STEP4 

1828 PRINTX;CHRS(X) ,X*1 ,-CHRS (X*l ) , X*2; CHRS (X*2) ,X*3 ; CHRS (X-O ) 

1825 PRINT 

183B NEXTX 

1848 INPUT"PRESS ENTER TO CONTINUE";X 

1845 CLS 

1858 FORX-156T0183STEP4 

186 8 PRINTX;CHRS!X) ,X*1 ;CHR$ (X* 1 ) ,X*2;CHR$ (X*2 ) ,X*3; 

CHRSIX+3) : PRINT 

187 8 NEXTX 

1880 INPUT'PRESS L'NTEK TO CONTINUE" ;X 

1898 FORX=184T0191 

1188 PRINTX;CHRS(X) : PRINT 

11 18 NEXTX 

1128 INPUT'ENTER 1 TO REVIEW, 2 TO RETURN" ;B 

1138 IFB-1GOTO10B0 

1140 IFB-2GOTO40 

2880 CI.S:PRINT"ENTER THE NUMBER OF THE SEED PATTERN DESIRED:" 



2810 PRINT" 



2B2e PRINT" 



1 - RANDOM 

2 - BOX 

3 - LONG BAR 

4 - SMALL RANDOM GROUP 

5 - TALL BAR 

6 - MIXED SEEDS 
7-4 RANDOM GROUPS 



11 - ARCH (PI) 

12 - LONG BARGE 

13 - LARGE BLOCK 

14 - GLIDERS 



16 - TALL RANDOM 

17 - TWO ARCHES 98 DEG. 

8 - FLASHERS i GLIDERS 18-2 DIAGONAL RANDOMS 

9 - THIN SQUARES 19 - THICK SQUARES 
283B PRINT" 10 - SPARSE RANDOM 20 - SURPRISE" 
2848 PRINT: INPUT'ENTER 1 THROUGH 28" ;C 

2858 0NCGOTO218B, 2288,2388, 2488, 2588, 2680, 27 0, 2880, 2908,3888, 

31 08, 3288,3388, 3488, 3580, 3608, 37 88, 3 80 8, 398 8, 4800 
2188 GOSUB9999 
2118 F0RX-1536BTO16383 
212B Y-127+RND(64) 
2138 POKEX.Y 
2140 NEXTX 

2190 M%-USR(8) :GOTO2080 
2200 GOSUB9999 

2210 POKE15829,183:POKE15830,149 
229B Mt-USR(B) :GOT028BB 
2388 GOSUB9999 
2318 F0RX-15817TO1586B 
2328 POKEX,191 
2330 NEXTX 

2398 M%-USR(8! :GOT02BBB 
2488 GOSUB9999 

2410 FORX«157BBT015716:Y-127*RND(64) :POKEX,Y : NEXTX 
2420 FORX-15764TO157B0:Y-127+RND(64) : POKEX.Y : NEXTX 
2430 FORX-15828T015844 : Y-127 +RND (64) : POKEX.Y : NEXTX 
2440 FORX-15892TO15908:Y-127+RND(64) : POKEX.Y : NEXTX 
2490 M%-USR(0) :GOTO2B00 
2500 GOSUB9999 
2510 FORX-61T067 
2528 FORY-3T042 
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Load the first index register (IX) with the first memory cell in the 
workspace. Index register IY is crucial; its value is the same as that 
of the new stack pointer. Initialize the stack at 7AEF (recall line 320), 
and now push six fresh zero bytes onto it (lines 710 to 740). In this 
way you can manipulate individual bytes near the top of the stack at 
will. These bytes are left on the stack, and the stack grows as the 
program progresses, but you still retain control over the contents 
without digging through the stack and piling heaps of bytes all 
about. 

This extensive manipulation of data is necessary because of the 
crude but serviceable graphics in the TRS-80. A byte of data is eight 
bits wide; bits through 5 normally define ASCII characters and con- 
trol codes (carriage returns, etc.), and bits 6 and 7 are ignored. But in 



! POKEX, Y tNEXTX 
: POKEX, Y tNEXTX 
:POKEX,Y:NEXTX 



: POKEX, Y tNEXTX 
:POKEX,Y:NEXTX 
: POKEX, Y tNEXTX 



tNEXTX 
tNEXTY 



3011 
3120 
3931 

304fl 

3091 



2S30 SET(X,Y) 

2540 NEXTY.X 

2590 KI-USR10) IGOTO2000 

2600 GOSUB9999 

2610 FORX«15400TO15408:Y-127+RND(64) t POKEX, Y tNEXTX 

2620 FORX-15464T015472tY-127+RND(64) : POKEX, Y tNEXTX 

26 30 FORX-16 300TO16311tY»127+RND(6 4) 

2640 FORX-16 364TO16 37 0:Y-127+RND(6 4) 

2650 FORX-15820TO15845tY-127+RND(64) : 

26 90 M%-USR(0) :GOTO2000 
2700 GOSUB9999 
2710 FORX-15360TO1537 0:Y-127+RND(64) 

27 20 FORX»15424T015434:Y-127+RND(64) 
27 30 FORX-15413T0154 23:Y-127*RND(6 4) 
2740 FORX-lS477T015487tY-127+RND(64) : POKEX, Y :NEXTX 
2750 FORX-16373T016383:Y-127+RND(64) : POKEX, YtNEXTX 
2760 FORX-16309TO16319tY-127+RND(64) t POKEX, YtNEXTX 
2770 FORX-16320TO16330tY-127+RND(64) : POKEX, YtNEXTX 
27 80 FORX«16 256T016266:Y-127+RND(64) t POKF.X, Y ; NEXTX 
27 90 M%-USR(0) :GOTO200H 

2800 GOSUB9999 

2810 POKE1599 3,1 30 tPOKEl 5994,1 55 tPOKEl 5857, lB2tPOKE1585B, 144 t 

POKE16309,167:POKE16 310,129 
2820 POKE15570,183:POKE15 571,14 9:POKE16060,183:POKE16061,149: 

POKE15 364,183:POKE15 365,149 
2830 POKE16160,183tPOKF.16161,149 
2890 M%-USR(0) :GOTO200O 
2900 GOSUB9999 

2910 FORX-20TO40:SET(X,5) :SET(X,17) 
2920 F0RY-5TO17 :SET(20,Y) :SET(40,Y) 
2930 FORX«77T095:SET(X,28) :SET(X,41) tNEXTX 
2940 FORY-28T041:SET(7 7,Y) :SET(95,Y) :NEXTY 
2990 M%-USR(0) :GOTO2000 
3010 GOSUB9999 

FORX-15360TO163B3STEP3 
■127+RND(25) 

POKEX, Y 

NEXTX 

M\-USR(0) iGOTO200C 
3110 POKE15B39,151 : POKE15840 , 149 
3120 M%-OSR(0) :GOTO2000 
3200 GOSUB9999 

3210 POKE15830,150:POKE158 31,148:POKE15894,137:POKE15895,129 
3290 M%»USR(0) :GOTO2000 
3300 COSUB9999 

3310 FORX-45TOB5:FORY»9T029tSET(X,Y) :NEXTY,X 
3390 M%«USR(0) 1GOTO2000 
3400 GOSUB9999 

3410 POKE1549B,160:POKE15499,185:POKE15950,167:POKE15951,129 
3490 M%-USR(0) :GOTO2000 
3500 GOSUB9999 
3510 POKE157 46,144:POKE157 47,160:POKE15810,164:POKE15811,17 6: 

POKE15B12.149 
3590 H%»USR(0) :GOTO2000 
3610 GOSUB9999 

3610 FORX-15392T016 383STEP64 
3620 Y-127+RND(64) i POKEX, YtNEXTX 
3630 FORX-15393T016383STEP64 
3640 Y-127 +RND (64 ): POKEX, Y tNEXTX 
3690 M%-USR(0> :GOTO2000 
3700 GOSUB9999 

3710 POKE15B20,151:POKB15821,14 9:POKE15859,183iPOKE15860,145 
3790 M%-USR(0) SGOTO2000 
3800 GOSUB9999 

3810 PORX»15360TO16383STEP69:Y«127+RND(64) : POKEX.Y: NEXTX 
3820 FORX»15424T016319STEP59:Y-127+RND{64) : POKEX, Y: NEXTX 
3890 M»-USR(0)tGOTO2000 
3900 GOSOB9999 

3910 FORX-16T036:FORY-2T05:SET(X,Y) :NEXTY,X 
3920 PORX-16TO20iFORY-6TO9tSET(X,Y) :NEXTY,X 
3930 PORX-32T036:FORY«6T09:SET(X,Y) :NEXTY,X 
3940 FORX-16TO36:FORY-10TO13:SET(X,Y) :NEXTY,X 
3950 FORX-48T057iFORY-24T038:SET(X,Y) :NEXTY,X 
3960 FORX«50TO55:FORY-28TO34:RESET(X,Y) iNEXTY.X 
3990 H»-USR(0) IGOTO2000 
4000 GOSUB9999 

4010 FORX»15360TO16383tY-RND(255) : POKEX.Y : NEXTX 
4090 Mt-USR(0) :GGTO2000 

9998 GOT09998 

9999 FOBX-1536BT016383: POKEX, 128 :NEXTX: RETURN 
READY 



the TRS-80, these most significant bits cause the video circuit to 
switch from ASCII mode to graphics mode. 

A zero in both bits 6 and 7 will produce the expected letters and 
numbers; but if either or both of these bits goes high, the computer 
triggers a group of circuits which switch out of ASCII mode, and pro- 
duce a small graphics block for each of bits through 5 which is also 
high. It is a simple, functional video system, certainly not high-reso- 
lution, but assuredly better than an entire block per character. 

A diagram of a video memory cell and the bits responsible for 
each "hexant" is given in Fig. 1. 



1 

2 3 

4 5 



Fig. 1. 



Recall that the Game of Life rule requires that we look at each 
neighbor of a cell. If each block were a single byte-sized entity, we 
could evaluate its neighbors quickly and easily: The one above, the 
one below, left and right, and the four corners. But this TRS-80 bit 
system makes things quite nasty. If we label a cell X, and it lives in 
memory location A, what are its eight immediate neighbors? Well, 
there's more to know. What bit position does this upstart X occupy 
in a byte? Okay, let's arbitrarily say X resides comfortably in bit posi- 
tion zero, thus: 



A 
« 1 
2 3 

4 5 



Okay, seems easy. First neighbor, to the right, is bit 1; clockwise, 
the next is bit 3; then clockwise again it is bit 2. Pretty safe so far. 
Next neighbor clockwise is . . . hmmmm . . . memory location A 
minus one, uh .... bit 3. Better draw that: 



o 1 
23 
45 



X 1 

23 

45 



Yes, fine. Next neighbor further clockwise is memory location A 
minus 1. bit 1. Still safe. But then, what about the next neighbor 
clockwise? It's a line above on the screen, and back a space. Since 
our screen is 64 characters wide, this is back 64 and back one more. 
Now we've got to look at bits in A minus 65 and probably, if Intuition 
serves, in location A minus 64 too. We'd better draw it. 



A-65 
1 



A 64 
1 

23 23 

45 45 



1 
23 
45 



x 1 
23 

45 



Yes. intuition is correct. We've got to check A minus 65. bit 5. and 

Continue to page 46 
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adjust data within a certain geography of the register's base value. 
You may, for example, change the contents of memory location IX, 
1X-32, IX + 17 and so forth. The relative jump instruction is one byte 
shorter than an absolute jump, saving considerable time in this pro- 
gram requiring thousands of jumps. 

Finally, we need to preserve not only the BASIC stack (which is 
fairly large) for use with the seed programs, but also maintain an ex- 
tensive stack of values analogous to the video pattern we are ad- 
justing. 

We know further that a check of all the cells in a given memory 
location must be made; thus, our algorithm for cell checking should 
probably be done within the context of one memory address at a 
time. If there are six cells in a video memory location with eight 

Continue to page 48 



A minus 64, bits 4 and 5. That's quite a lot of manipulation there, and 
there are six different bit possibilities for every memory location! 
And to make matters worse in terms of speed, a machine operation 
to check the presence of a bit is itself four bytes long. 

Get a Cup of Coffee 

If this were in my living room and not a magazine article, I would 
invite you to have a cup of coffee, sit back, and clear your mind. It 
took me three months and eight versions of the program to discover 
the key to speedy operation. 

My solution to the fast Game of Life algorithm would not have 
been possible if the designers of the TRS-80 had chosen another of 
the popular microprocessor chips. The two index registers— 16-bit s 
wide— are needed, so also are relative jump instructions, bit test 
and manipulation, and an extensive stack movable anywhere in 
memory. The index register, you may recall, allows you to store and 




Photos 18-21: A long bar universe created from several hundred 
cells, at birth; generations 2, 6, 13, and 14. 
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NEECO 

proudly COMMODORE'S NEW 8000 

INTRODUCES SERIES (80 column) COMPUTERS 






$1695 (available May/June '80) 

CBM™ 8050 DUAL DRIVE FLOPPY DISK 

The CBM 8050 Dual Drive Floppy Disk in an enhanced ver- 
sion of the intelligent CBM 2040 Disk Drive. The CBM 8050 
has all of the features of the CBM 2040, and provides more 
powerful software capabilities, as well as nearly one meg- 
abyte of online storage capacity. The CBM 8050 supplies 
relative record files and automatic diskette initialization. It 
can copy all the files from one diskette to another without 
copying unused space. The CBM 8050 also offers improved 
error recovery and the ability to append to sequential files. 

HARDWARE SPECIFICATIONS FIRMWARE 
Dual Drives DOS version 2.I 

Two microprocessors 
974K Bytes storage on two 5 25" 

diskettes (ss) 
Tracks 70 
Sectors 17-21 
Soft sector format 
IEEE-488 interface 
Combination power (green) and 

error (red) indicator lights 
Drive Activity indicator lights 
Disk Operating System Firmware 

(12KROM) 
Disk Buffer (4K RAM) 



Sequential file manipulation 
Sequential user files 
Relative record files 
Append to sequential files 
Improved error recovery 
Automatic diskette initialization 
Automatic directory search 
Command parser for syntax 
validation 
Program load and save 



CBM™ 8000 SERIES BUSINESS COMPUTERS 

The new Commodore 8000 series computers offer a wide screen 
display to show you up to 80-character lines of information. Text 
editing and report formatting are faster and easier with the new 
wide-screen display. The 8000 series also provides a resident Oper- 
ating System with expanded functional capabilities. You can use 
BASIC on the 8000 computers in both interactive and program 
modes, with expanded commands and functions for arithmetic, edit- 
ing, and disk file management. The CBM 8000 series computers are 
ideally suited for the computing needs of the business marketplace. 



SCREEN 

2000 character display, organized 

into twenty-five 

80-column lines 
64 ASCII, 64 graphic characters 
3x8 dot matrix characters 
Green phosphor screen 
Brightness control 
Line spacing: 1 '/? in Text Mode 

1 in Graphics Mode 
KEYBOARD 
73-key typewriter style keyboard 

with graphic capabilities 
Repeat key functional with 

all keys 
MEMORY 
CBM 8016: 16K (15359 net) 

random access memory (RAM) 
CBM 8032 32K (31743 net) 

random access memory (RAM) 

POWER REQUIREMENTS 
Volts: 110V 
Cycles: 60 Hz 
Watts: 100 



SCREEN EDITING 

CAPABILITIES 

Full cursor control (up, down, 

right, left) 
Character insert and delete 
Reverse character fields 
Overstriking 
Return key sends entire line to 

CPU regardless of cursor 

position 
INPUT/OUTPUT 
Parallel port 
IEEE-488 bus 
2 cassette ports 
Memory and I/O expansion 

connectors 
FIRMWARE 
24K or ROM contains: 

BASIC (version 4.0) with direct 

(interactive) and indirect 

(program) modes 
9-digit floating binary arithmetic 
Tape and disk file handling 

software 



The 8000 Series will be available May/June '80 
Model 8016 Model 8032 2040 Dual Floppy 

$1495 $1795 $1295 



CBM™ IEEE MODEM 

SPECIFICATIONS 
'Full or half duplex operation 
'300 bits per second 
"Standard IEEE 488 interface 
"Switch selectable originate, off. 

answer-full duplex, test, half duplex 
'Visible indicators are transmit data, 

receive data, carrier ready, test 
•Frequency shifted modulation 
"Bell 103/1 13 compatible 

"Execeptional performance 
even on noisy phone lines" 




Available June/July 

$395 



'CBM is a registered trademark of Commodore. All prices and specifications are subject to change without notice. 
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neighbors each, that comes to a total of 48 evaluations. 

Before your cup of coffee, we were attempting to test a cell and all 
of its neighbors. If we test cell X in bit of memory location A, then 
bit 1 is among its neighbors. Later, we will need to know, for exam- 
ple, the neighbors of bit 2 in memory location A. Or the neighbors of 
bit 3. Or the neighbors of bit 5 in memory location A minus 64. If we 
make our cell checks independent of each other, we will be engaging 
in enormous redundancy. If cell X has eight neighbors, then doesn't 
it follow that cell X is itself the neighbor of eight other cells, in- 
cluding the ones just mentioned? Aha! 

Examine the diagram below. 

5 4 5 4 

10 10 
3 2 3 2 
5 4 5 4 

10 10 

Here we have a video memory address together with all the in- 
dividual cells that can be considered its immediate neighbors. In all, 
only 20 cells need to be examined to determine the fate of all six be- 
ings in that memory address. Let us now assign this memory ad- 
dress to register IX; all the needed addresses are well within the 
relative addressing range of IX: IX -65, IX -64, IX -63. IX -1, IX, 
IX + 1. IX + 63. IX + 64 and IX + 65. 

Return again to the assembly listing, beginning at line 800. This is 
the test for bit 5 in address IX -41 (the listing uses hexadecimal 
notation since the screen is numbered in even blocks of 40 hex). 
Twenty bit tests are made, identical to the pattern described above. 

What is done with the result of each bit test? You could store the 
result, using standard instructions, elsewhere in memory, in- 
crementng to the next or decrementing to the previous address as 
necessary. But this process consumes considerable time, and re- 
quires that flag resisters be saved, addition or subtraction be per- 
formed and so forth. 

Instead, look at lines 710 through 760. Here, you may recall, six 
empty bytes were pushed onto the stack, and the IY register was 
given to the top (actually, to the bottom, as the Z-80 stack moves 
downward in memory) stack value. If each byte in the stack 
represents one bit or being, then IY can sum the neighbors of being 
(bit) 5, IY + 1 can hold the total neighbors for bit 4, and so on. This is a 
terrible waste of memory, you may insist; I agree. It is, however, the 
fastest way of completing the Game of Life computations using the 
80's complex graphic bit system. 

Is Your Neighbor Alive? 

Let's follow this process through. Bit 5 of IX - 41 is tested. If the 
neighbor is alive (result of the bit test equals one), increment the 
value stored in IY + 5. If not, skip it, going on to test bit 4 of I Y - 40. If 
this neighbor is alive, increment the value stored in I Y + 5 and IY + 4. 
Why in two locations? Because bit 4 of IY- 40 is neighbor to two 
cells in our memory location, cell and cell 1. If this neighbor is not 
alive, skip to the next test. 

Time for more coffee. Just to be sure, follow each bit test in lines 
800 through 1670 of the assembly listing. Test a bit. Is it alive? If so. 
add one to the stack byte representing the memory cells to which it 
is a neighbor. If not, go on. Make 20 tests. When all the checks ar 
complete, the six-byte stack will contain the total number of 
neighbors for each bit in the memory address under observation. 
Finally (line 1680). the memory address under test is advanced. The 
jump to HOLD shown in line 1700 is one of the special features of 
Playing "God" with Life, so for the moment, ignore this command. 

At line 1740, the BC register is decremented and tested; if all 1,024 




bytes (400 hex) video memory locations have been checked, the pro- 
cess ends. If not, we go back to line 670 and PUSH six more zero 
bytes onto the stack, each representing a bit in our next universe 
location. Earlier I mentioned that an extensive movable stack is im- 
portant to the operation of this Life algorithm; with six bytes as- 
signed to each universe location, and 1,024 locations to examine, 
this results in a fairly monumental stack more than 6K bytes deep! 

When the examination process is complete, how do we make our 
changes? First, let's see where we are. You have the initial genera- 
tion on the screen, a duplicate of it in a workspace, and 6,144 bytes 
of stack. Your object is to evaluate the stack values, a byte at a time, 
and alter their corresponding cells according to the result. 

At the top of the stack is the last cell evaluated. We begin the 
generation change process at the last memory address in 
workspace, STORE + 3FF (line 1830). POP a register off the stack, 
and compare the first byte to 2. If it is 2, remembering Conway's rule, 

Continue to page 50 
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BUSINESS CONTROL PROGRAMS 



; ! PAYROLL I ] GENERAL LEDGER ACCOUNTS PAYABLE J ACCOUNTS RECEIVABLE 

These business systems are designed with the business man- • A Totally Linked Single Entry 
ager in mind Major changes m your current bookkeeping meth- Accounting System 



Data may be entered into any one of the systems either directly 
or through subprograms, so that duplicate data entry is not re- 
quired this avoids mistakes. 

Accurate reports of financial activity may be obtained on a 
scheduled basis or at irregular intervals 

The systems require CP M and CBASIC Customization, instal- 
lation and training are available at additional cost WRITE FOR 
SAMPLE REPORT AND TRIAL DISK — $25 00 (credited toward 
purchase price). 



Provide User Prompting for Each Entry 
User Assignable Account Numbers 
Flexible. Reliable and Efficient 
Installation and Training Available 



AS LOW AS 




CP M 2.2 Control Program for Microcomputers 

Enabling You to Run Software Published for 

CP M 1.4 on the TRS-80 Model II hkm*i commit**, ****.,! 





CP M is considered the industry standard disk operating system be- 
cause it gives you the hardware-independent interlace you need to 
make your computer work for you FMC CORPORATION NOW OFFERS 
THE CP M 2.2 FOR THE TRS-80 MODEL II The litest in the evolution 
of a reliable and efficient software system. CP/M 2 2 features an en- 
hanced upward compatible file system and powerful new random ac 
cess capabilities From minidisks and floppy disks, an the way to high 
capacity hard disks (when available), the flexibility of CP M 2 2 makes 
it a truly universal operating system. The package includes an 8 sys- 
tem disk, editor, assembler, debugger and communication software lor 
the TRS-80 Model II Special utilities not available with other CPM sys- 
tems are also included in FMG's CP M 2 2 

(CPMts a registered trademark of f 

Oigrtal Research Corp TRS-80 is a 
registered trademark ot Radio Shack) 



» TRS-80 PROJECT 




THE PASCAL/MT&$250.00 

PASCAL MT- a native code PASCAL compiler designed for 8080-8085 
and 280 microcomputer systems, provides an efficient development 
cycle as well as efficient execution of object programs 



CORPORATION 



P.O.BOX 16020 

Ft. Worth. Texas 76133 
Phone (817) 294-2510 



Send tor FREE CATALOG 




i Compiler executes under It* CP M 
operating system m at little as 32 
K bytes o' RAM 

' Interactive Symboac Debugger which 
•rubies the programmer to examine 
variables, set a breakpoint, and trace 
procedure calls interactively at run 
time ° 

• Complies at the ra»> of BOO imea per 
minute on a 2 MHZ BOCO 

• Programs Execute up to 10 TIMES 
FASTER than popular interpretive 
Pascals 

• The code generated is 6080 object 
code which is ROMable with a mini- 
mum run bme ove rh ead ol 1 5K bytes 

• Interrupt procedures aftow the pro- 



? rammer to wrrte interrupt drivers tor 
and other real fcme teaks in Pas- 
cal MT 

• Bit manipulations of variables may be 
performed with the built-in proce- 
dures SETBIT. CLRBIT TSTBlT 
SHL SHR, SNAP. 10. Ml 

• Aeeembty language subroutines mey 
be caaed from PaacaiMT 

• Buemees arithmetic version of Paso* 
AIT is aieo avanabte 

• Paecaf data structures supported are 
ENUMERATION AND SUBRANGE 
TVP€8. RECORD, ARRAY REAL 
INTEGER CHAR and BOOLEAN 

• Not implemented are SETS. GOTO. 
GET. PUT 



pascal MT'- includes compiler and i real time symbolic debugger 
The system requires 32K minimum and 2 mini disks or one 8" disk 



N'Raeswr Serwce- see sage »« 
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& THE BOOK 

ACCESSNG THE TRS-60* ROM 

-nomui 




If you aver do 
Assembly 
language 
programming, 
or you just want 
to know more 
about your 
TRS-80 ROM, 
"THEB00K" 
la for you. 



Volume I will give you access to over fifty ma- 
chine language subroutines in the Radio Shack 
Level II BASIC. It includes information on the nu- 
meric data formats and a commented listing of the 
ROM routines. 

"THE B00K, Volume I", encompasses all arith- 
metic functions and mathematical operations. 
There are separate routines for integers, single 
precision, and double precision numbers and the 
data format for each of these number types is 
explained. The routines that perform ASCII to bin- 
ary and binary to ASCII conversion are identified 
and explained to provide you a means of data I/O. 

A fully commented listing provides the details on 
the step-by-step execution of these ROM rou- 
tines. Although a complete disassembly is not 
provided in order to avoid copyright infringement, 
you can obtain a complete disassembly using the 
disassembler program listed in "THE BGK0K." 
Volume I also includes a complete, detailed mem- 
ory map of the entire machine and a symbol table 
noting over 500 addresses. 

"THE B00K" will save you hour upon hour of 
assembler program development time. Don't start 
programming without it. 

Order your copy of "THE B00K", today! 



DEALER INQUIRIES INVITED 



Insider* Software Consultants, Inc. 
P.O. Box 2441, Dept. M1 
Springfield, VA 221 52 ^ m 

□ Please send me Volume I of THE B00K 
at $14.95 plus $1 .50 for postage. 

NAME 



•TRS-M it ■ trademark of 
Tandy Corp. 



AOORESS 



4 ZIP CODE 



□ Check payable to Insiders Software Consultants. Inc. 

□ MASTER CHARGE MC Bank Code: 

D VISA Exp. Date: Card Number: 



Signature 



the current contents of a cell remain unaltered — no birth, no death. 
If it is not 2, compare it to a 3. If it is a three, then a cell must be given 
birth, as in line 1920. (If a live cell is already in place, this action has 
no effect, but still satisfies the Life rule.) A more exhaustive test is 
only redundant. 

Finally, if our byte is neither 2 nor 3 (the number of neighbors), 
then of course it must be less than 2 (lonely) or greater than 3 (over- 
populated) and Conway's rule stipulates that in such a cir- 
cumstance, the cell cannot live. Line 1900 resets (turns off, or kills) 
this bit. 

Line 1930 examines the next byte in the same terms. Although the 
POP-and-test pattern is identical for all three byte pairs, a CALL to 
subroutine is not used in the interest of speed. In fact, in the entire 
Playing "God" with Life program, memory is almost always sacri- 
ficed in the interest of speed. This program uses six times the 

Continue to page 52 
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THERE IS A DIFFERENCE 



TRS-80 DISK DRIVES capacity 



Expansion interface - gives 
your TRS-80 the disk capacity 
it needs, and much, much more! 



10 to 40 MByte, 8" 
Winchester drive - 
expands capacity far 
beyond Model II storage. 






% 









Single sided minifloppy 
up to 150 KBytes of 
storage capacity. 



Single or double sided 
8" floppies -up to 2.5 
MBytes in dual drive 
cabinet - for the 
serious TRS-80 user. 





LOBO DRIVES' new family of disk memory 
products provides you with a choice of memory 
capacities you need to effectively execute the 
complex business software you've developed 
for your TRS-80*. LOBO DRIVES' selection of 
readily available, software compatible drives 
permits you to expand your inventory, payroll, 
customer list, and accounts receivable files as 
your business grows. 

And LOBO DRIVES brings you more ... a new 
plug-in expansion interface that provides an 
easy way to add hardware enhancements, 
communications capability, and programmable 
features . . . and it comes with the LOBO 
DRIVES famous 1 year, 1 00% parts/labor 
warranty. 

Call or write for the complete LOBO DRIVES 
story. Find out just how competitively priced a 
family of high capacity drives can be . . . 



Quantity discounts available - 
Dealer inquiries invited 



^"clrii/es 



i 



^■15 INK IINAIII1NAI 



935 Camino Del Sur Goleta. 
California 93017. 
(805) 685-4546 

"CAN YOU REALLY AFFORD 
TO PAY LESS - ?" 



Yes, I want to know more about LOBO Drives 
and what they can do for my TRS-80. Send me 
information on: 



D 5 1/4-in. Floppy drive 

D 8-in. Floppy drive 
Single sided 
Double sided 



□ 8-in. Winchester hard 
disk, 10 Mbyte drive 

□ Double density 
expansion interface 



Name 

Company 

A,],"! . 

City 

Phone No 



Slate 



Zip 



I' dealer, provide resale no. 



♦ TRS-80 is a registered trademark o» Radio Shack, a Tandy Company 



^Reader Service - see page 162 
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memory that a slower program would. But for advanced games, the 
Level II 16K TRS-80 Is fairly standard. Were this program a utility, the 
space would be crucial, but for Life, it's whatever makes the game 
most effective. 

When six byte evaluations are completed, you have altered one 
memory address in, your workspace. At line 2350, decrement the 
workspace value, and decrement the loop counter. When this pro- 
cess is complete (1,024 evaluations), it is just about time to restore 
the newly derived generation to the screen. 

This is a flat world, this video screen, yet the memory itself is not 
set up that way. The display wraps around contiguous memory loca- 
tions: 3C3F (the last location in the first row) is neighbor to 3C40 (the 
first location in the second row). Lines 2480 through 2550 reset a thin 
line of memory cells on one side of the screen (actually, at this point, 
In the workspace). This action provides the remainder of the "border 
of pestilence" set up earlier for the top and bottom rows of the 
display. Finally, at lines 2590 to 2620, the workspace is restored to 
the video monitor, and the new generation comes into view. 

The balance of this program is taken up with the special features, 
including display hold, a generation count, return to the BASIC pro- 
gram, and the "god" control, in actuality only a cursor, flashing on 
and off over the top of the current contents of four contiguous video 
positions. 

A check of the generation status flag is made beginning at line 
2660. If the user selects a generation count display when the ques- 
tion is posed in the original instructions, the generation counter is 
incremented, converted to decimal, and finally to ASCII characters 
(lines 2710 through 3020). Since the numerals themselves can in- 
fluence future generations, it is necessary to sweep clear a path 
around them. This is done in lines 3070 to 3180, where the bordering 
bits are reset. 



4 SPEED OPTIONS FOR YOUR TRS— 80! 

The SK— 1 - th* moti vrr utile clock mottiiKaHion .wtUhr tor th* TRS - *0 Sow* mjy br .wit.h«d bctwn normal 
rriiaMr in.rcattr ot Vi*fc n, * WN, reduction . trlrctahlr it anv nm» without imrrrupting ritnifiofi or cra-hing Af progran 
InmutTiont *rr *.*.- givm lor * 100% .r>. rraw ro I S4 MM/ (your TRS -SO mjy rw* b* rrlublr at ihi. »p**d> h may ( 
• ixihjturrd by thr u»#r NMfcMQI *prrd with J fogx 1 ' »witch or on lolnm command' It will automjfuailv rrturr. to norm 
•pen. anv nmr • ■'.,» .* Kttff r«juir*» no (hjngv to »hr operating -v* Trm a»d h*- pmviHont to* adding an I ED i« indK* 
wh*-n tut computer i* not it mMmi torni it mount* invitfe the ki-yKur .1 unir with only i MpHM) connection, tor the »wit. 

•pthin »wif>h n.ii rnttucletai jru i« r.«.l v rrmovfd it the computrr ever need* wvKr rSe sh ? dimn lull, atfcembieu' wn 
Mvhrtrd M » am. ilrumatrij in*tru<tion» ( omplete wmtjction M gu*rjnffrd SJt— 1 SUMS 



PROGRAM INDEX FOR DISK BASIC 

A.vrmble an alohjhrti/cd mde. *»f voor entire program library Irom di.k directories Progum njmn and tree vpaceare read 
automatical!* need not be tvpec in i and mjv be alphabetized b> di.k or program The h»t mav alto br traiched tor any disk, 
program or rumwrti di.k. or program, added or deleted and the whole li.t or anv parr *enr ro rhe printer I mallv the li.t 
M0 mav be .toted on di.k for luturr acre., and updarr Reviewed in the lanuarv ivcufol KaMHtocomputing (me drive and 
UK requited INDEX....4K.N 

DUPLICATE SYSTEM TAPES WITH "CLONE" 

TTii. machine language P i,,r,m make, duplicate ionic, nl ANY tape written lor Level II they ma* br SYSTEM tape, 
(continuou.ot notl of data li.l. It i. nor tvetenaiy to know the lilt- name 01 «kir ,t load. ,n memory and the.e I. nochance 
MINIM «0 re»tden.v The lite name rntrvpoint. andeverv bvle ,in ASC II lor mall jrediaplayrdonihe videoicreen l>ata 
mav br mudihed belofe ,opv i. produced CLONE SIS.H 

EDIT BASIC PROGRAMS WITH ELECTRIC PENCIL 

Thi. program allow, di.k u.er. ... load »a.,< prnnrams or anv orhrr \M II data Ilia- into thr di.l vnanv ol I levin. Pencil lor 
edining Uil line n.mber. move or duplicate program wcmciil. and .ear.h l„. the t.cui.nce ol «iv group ol chancier. 
t>ne ,.»nmand Irom IX>S quickly modilir. eii.nng hl« to Pencil format PENPATCH JS.9J 

SPOOLER FOR PARALLEL PRINTERS 

In,, program .. a lull learurr prim lormattmg package teatunng ym drhnrable line and page iengrh | »ith imr leext. mwrled 
between word, or aller puncrua-ioe. Kteen dump kevboard dVb.mn.e and printer pauw i>«ittoi In addrnon priming i. 
done Irom a 4k. eaparatable bullei area ki that the I PRINT or LUST command return, control to the uwt while printing i. 
being done Ideal lor Srlect'ic or other .low primer. Allow, printing and proceaamg ro run concurrently 
SPOOLER SUM 

RAM TEST FOR LEVEL II 

Thi. macraiw language program te»t. memory chip, lor open or .horted addrm ot data line. a. well a. intermittent. Ir tern 
each BIT tot validity and each BYTT in the execution ot an amial marruction a. in real progtam eaecution Bad addrevv. are 
dnplayed along with the bad oa-a and proper Jala One complete l«»t ol «»r< take. lU.t M «e».-vd. Al«> include, a rr« lor 
error, induced by powrr line ghtche. Irom eatemal enuipmenr RAMTEST.....S9.M 

INSIDE LEVEL II 

Inaide Ifrri II i« a comprehen.i.e releren,e guide ro the Level II ROM. which allow, the machine language programmer to 
ea»ily unlue the nfhnncatad routine, they contain tonenfiy eaplain. wt - up. calling wquence. variable parage and 1 
routitvn Sftriai icmwderattcm n given to di.k ...tern. Pan II pnwtin an rntinly new coenpoute ptogtam «n«tutt winch 
iciad. under rhe SYS TIM commind and eimitn in both Ba.:, and machine code with the .peed and etlicwtwy ol ■ complin 
Ir addition the la chapter, incude a large bod\ ot other information u»*tu! ro the programmer 
INSIDE LEVEL I1.....I1S.I5 



A.. ,,,,:„:,. 



Pia-aae include '3 pottage California retidetit. add •>*■ takn ta. 
f u.uallv .hipped on casMfte Add S4 CC tor duk ( ompiete Mti.lartvon ot hill refund 



MUMFORD MICRO SYSTEMS 

Box 4SV-E Hummel-land, California 93067 (MS) 969— 4557 



i^144 



Earlier, we ignored a command to jump to the HOLD routine 
before re-evaluating the generation. You can depress letter H on the 
keyboard to freeze the current display on the screen (lines 3220 
through 3250); or you can return to BASIC by depressing letter X, 
after first restoring its original stack pointer (lines 3260 through 
3300). Finally, you can "play god'" by pressing the G. and the pro- 
gram is diverted to a series of routines beginning at line 3430. 

This controlling cursor is initiated at the top left of the screen 
(lines 3430 through 3520). A short delay allows a comfortable 
flashing rate. The keyboard is then scanned for three groups of com- 
mands: motion commands (the four keyboard arrows); activity com- 
mands (bear or kill, letters B or K); and the cancel command (return 
to mortality, letter M). 




Photos 22 - 27: A symmetrical block (the 4:3 ratio of graphics blocks 
in the TRS-80 accounts for the vertical elongation), at birth; genera- 
tion 1, 4, 7, 8, and 9. 
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Upon the choice of bear or kill, an asterisk appears, isolating the 
six points in one memory location. Pressing the appropriate number 
(0 through 5) will set or reset that bit (lines 4090 through 4770), 
changing one cell on the screen. Pressing M (mortality) returns to 
the start of the generation checks, so that any change wrought by 
the cursor will be incorporated into the next generation of beings. 

Flaws, Frustrations and Bedevilment 

The individual graphics block visible on the screen is actually a 
matrix of three dots by four dots. Because of this, symmetrical im- 
ages will appear vertically elongated. Also, the universe is nearly 
twice as wide as it is high. Both these flaws are inherent to the 
TRS-80's video graphics system. 

One additional game variable is that the controlling cursor can 
march omnipotently through any part of memory. Holding the down 
arrow causes the cursor to disappear off the bottom of the video 
screen. This little bedevilment will allow "god" to be marched 
through any part of memory, and the bear or kill commands can be 
used in any part of RAM (or even on the memory -addressed ports). 
This invisible action can crash a program or wreak any kind of 
havoc — something I consider a nice touch. 

If your preference is speed over size, it is easy to revise this pro- 
gram to use the 32-character mode. Remember, of course, that alter- 
nate, even-numbered memory locations are addressed in this video 
format, and that the location of the large-character flag is port 255, 
bit 3(1 = on, = off). Normal video is always restored whenever the 
Life program returns to BASIC. With these alternatives, the 
program's speed will be doubled to nearly 150 generations per 
minute. 

Another modification, not to the software, but to the hardware, 
yields something I have found very pleasant to watch: Surplus 
monitors with the slow green phosphor are available in the $40 
range, and although it is nearly impossible to read normal (64 
character per line) text with them, the Life displays appear with high 
resolution, and the slow phosphor imparts an eerie, organic ap- 
pearance. 

Acknowledgments and Conclusion 

Thanks are due to Philip K. Hooper, a programmer and 
mathematician, for his inspiring version of Life and Serpent for the 
KIM; and to Claire Manfredonia, who suggested that a deity could 
visit this electronic universe of beings to intervene with fate. 

I have received a few comments regarding my use of the "god" 
cursor. No offense was intended; rather, I feel that control even 
when playing a game, should be approached with caution and even 
fear. It is surprising to consider the amount of violence embedded 
and assumed a part of computer games. ■ 
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This Weekend: 

STIK 
IT.... 

••to your 



That's right' Eamark's VIDIET-STIK light pen hat the TRS-80 CONNECTION 
tor LEVEL I ft II Your 4K to 48K TRS-60 System will com* alive under your 
VIDIET-STIK within minutes of its arrival That's because there are no wires to 
solder or traces to cut. You're up and running as fast as you can plug the 
interface into your system's cassette EAR-jack, CLOAD our custom LIGHT- 
WAVE demonstration software and RUN And because the interlace has a 
plug for your recorder, you wont have to unplug it again when loading your 
other software tapes The interface allows them to pass right thru whenever 
you're not using the pen It's exclusive "switched tip" design means the pen's 
electrically isolated from your system when it's not in use Just point & press 1 
It's that simple Plug. CLOAD and RUN And have we got the software tor you 
to RUN with' Our demonstration tape includes a calibration program (used to 
adjust the CRTs bnghtness and contrast) plus STIK-TAC-TOE. AWARI and 
TOWERS Two challenging games and a puzzle that will keep grownups and 
children Stiking it to your TRS-80 for hours And there are instructions 
provided so you can begin writing your own light pen programs (iightware) 
for fun or profit (Level II) Or. just sit back and enjoy our LIGHT-WAVE tapes 
each month Esmark's unmatched commitment to Iightware can bring you up 
to five new games, puzzles, drills & educational quizes or simulations each 
month Our current LIGHT-WAVE releases are 



LIGHT-PAK2 — LIGHTPEG (4 p*g-|ump puzzles) 

ENORUN (Othello with a twist ) 
(LEVEL II) LIFE9 (Conway's LIFE with mutations) 

Price: $19 95 (including postage & handling) 
LIGHT-PAK3 — LITEGAMMON (Backgammon you'll Stik with) 
(LEVEL II) STIKWUMPUS (Caves with a little lite) 

M AZEMASTER (Maze after maze to poke thru) 

PRICE S19.9S (including postage & handling) 

Order yours now and we'll include a free copy of FLASHBACK. Esmark s 
newsletter dedicated to the latest news >n Iightware applications And. don t 
forget to tell your friends The VIDIET-STIK can also be ordered for use on 
most other micro systems using the following processor chips 



T 
R 

S 

8 
O 



8080 



Z80 



6800 



8502 



All that's required is a standard cassette jack leading to Ground and a 
readable single bit input port. Driver software is provided along with 
instructions for writing Iightware applications And tell your local Dealer that 
Eamark's got a Dealer package he won't want to miss out on Delivery is 3 to 6 
weeks from receipt of your order COD s are $3 00 extra but will be shipped 
within two weeks All prices are FOB Mishawaka. Indiana Indiana residents 
add 4% state sales tax 



ALSO COMING FROM ESMARK: 

( ] TRS-80 Printer Interface (Cassette AUX-jack interface for all RS232 
printers Includes LLIST& LPRINT software) 

I ) TRS-80 RS232 Communications Interlace (Makes your TRS-80 a full 
I/O terminal to timesharing systems the world over Gives you 
intelligent or dumb terminal capabilities at 1 10 or 300 BAUD Also 
includes Printer Interlace above with 20 mA current loop & TTL level 
I/O options.) 

— TRS-80 is a trademark of the Tandy Corporation — 



ES83l^r Is^^Hb^. incorporated 
507v* e. Mckinley hwy mishawaka. in 46544 

(819) 255-3035 

$62.95 

PLUS $1.50 
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00100 










00110 


• PLAYING GOD 


WITH LIFE 




00120 


; BY DENNIS BATHORY K I TS Z 




00130 


; VERSION 1.9 


3, 5 DECEMBER 1979 




0B140 


1 








001S0 


; SPECIAL THANKS TO 




00160 


I PHILIP K. HOOPER 




00170 


; CLAIRE MANFREDONIA 




BB18B 


1 






3C00 


BB19B 


VIDEO 


ECU 


3C00H 


SDH 


BB2B8 

B821B 


STORE 
1 


F.QU 


5D00H 




08220 


; PRINT LOAD 


MESSAGE ON SCREEN 




00230 


; 






3C00 


00248 




ORG 


VIDEO 




88245 


•LIST 


OFr 






00265 


•LIST 


ON 






00270 










00288 


; SAVE 


STACK, 


SET UP NEW STACK 




80298 








7BII 


88300 




ORG 


7B00H 


7B00 ED73FE7F 


00310 




LD 


(7FFEH) ,SP 


7B04 31EF7* 


00320 

00330 




LO 


SP.7AEFH 




00340 


; SET 


GENERATION COUNT TO 




00350 


1 






7B07 21F27A 


00360 




LD 


HL.7AF2H 


7B0A 3600 


00370 




LD 


(HLI.0 


7B0C 23 


00380 




INC 


HL 


7B0D 3(11 


08390 
00400 




LD 


(HL),9 




00410 


; BLANK UPPER 


AND LOWER BORDERS 




00420 


1 






7B»F 21C05C 


00430 




LD 


HL.STORE-40H 


7B12 0646 


00440 




LD 


B, 40H 


7B14 3681 


004S0 


BLANK 


LD 


(HL) ,80H 


7B16 23 


00460 




INC 


HL 


7B17 1IFB 


00470 




DJNZ 


BLANK 


7B19 210061 


00480 




LO 


HL.STORE+400H 


7B1C K4I 


00490 




LD 


B, 40H 


7B1E 3680 


00500 


BLINK 


LO 


'HL) .80H 


7B20 23 


00510 




INC 


HL 


7B21 1IFB 


00520 

00530 




DJNZ 


BLINK 




00540 


! TRANSFER VIDEO TO WORKSPACE 




00550 


1 THIS 


ACTION 


PREVENTS SCREEN "HAS 




00560 


| 






7B23 21003C 


08570 


PHIL 


LD 


HL, VIDEO 


7B26 11005D 


08580 




LD 


DE, STORE 


7B29 010004 


00590 




LD 


BC.400H 


7B2C EDB0 


00600 




I.DIR 




7B2E DD21905D 


00618 
00620 




LO 


IX, STORE 




00630 


1 SET 


UP SCREEN POSITIONS TO CHECK 




00640 


1 






7B32 D9 


00650 


LIFE 


HOI 




7B33 B1BBB4 


00660 




LD 


BC480H 


7B36 D9 


00670 
00680 


START 


EXX 






006 90 


) START V- ■■:'•' 


FRESH BYTE FIELD 




00700 








7B37 11BBBB 


00710 




LD 


DE,0 


7B3A D5 


007 20 




PUSH 


DE 


7B3B D5 


00730 




PUSH 


DE 


7B3C D5 


00740 




PUSH 


DE 


7B3D ED73FC7F 


• 0750 




LD 


(7FFCH) ,SP 


7B41 FD2AFC7F 


00760 

00770 




LD 


IY, (7FFCH) 




00780 


1 START <;•'•.• 


Or 20 CELL POSITIONS 




007 90 


1 






7B45 DDCBBF6E 


00800 




BIT 


5,(IX-41H) 


7B49 2613 


00810 




n 


I.CL01 


7B4B FD3465 


00820 




INC 


(IY+5) 


7B4E DOCBCB66 


80830 


CL91 


BIT 


4, (IX-40H) 


7B52 2816 


00840 




JR 


Z.CL02 


7BS4 FD34B5 


98858 




INC 


(IY+5) 


7B57 FD34B4 


00860 




INC 


(IY+4) 


7B5A DDCBC06E 


00878 


CL92 


BIT 


5, (IX-40H) 


7B5E 2806 


00888 




JR 


Z.CL03 


7B60 FD3405 


00890 




INC 


(IY»5) 


7B63 FD34B4 


80900 




INC 


(IY+4) 


7B66 DDC8C166 


80910 


CL93 


BIT 


4, (IX-3FH) 


7B6A 2803 


00920 




JR 


Z.CL04 


7MC FD34B4 


00930 




INC 


<IY*4) 


7B6F DDCBFF4E 


00940 


CL94 


BIT 


1, (IX-1) 


7B73 28B6 


00959 




JR 


Z,CL05 


7B75 FD3405 


00960 




INC 


(IY+5) 


7B7B FD34B3 


00970 




INC 


(IY + 3) 


7B7B DDCBFF5E 


00980 


CL95 


BIT 


3, (IX-1) 


7B7F 28B9 


00990 




JR 


1.CL06 


7B81 FD3405 


01800 




INC 


(IY+5) 


7B84 FD34B3 


91019 




INC 


(IY*3) 


7BB7 FD34B1 


91929 




INC 


IIY+1) 


7B8A DDCBFF6E 


91939 


CL06 


BIT 


5. (IX-1) 


7B8E 2806 


91949 




JR 


J.CL07 


7B9B FD34B3 


91959 




INC 


(IY+3) 


7B93 FD3401 


91969 




INC 


(IY+1) 


7B9« DDCBBB46 


91979 


CL07 


BIT 


0. (IX) 


7B9A 2809 


91989 




JR 


I.CL08 


7B9C FD3404 


91990 




INC 


(IY+4) 


7B9P FD3403 


01109 




INC 


(IY+3) 


7BA2 FD3402 


91119 




INC 


(IY+2) 


7BA5 DDCB004E 


91129 


CL08 


BIT 


l.(IX) 


7BA9 28 09 


01130 




JR 


X.CL09 


7BAB FD3405 


91149 




INC 


(IY+5) 


7BAE FD3403 


01150 




INC 


(IY + 3) 


7BB1 FD1402 


01166 




INC 


(IY*2) 


7BB4 DDCB0056 


• 1170 


CL89 


BIT 


2, (IX) 


7BB8 280F 


01188 




JR 


I.CL10 


7BBA PD3405 


01190 




INC 


<IY*S) 


7BBD FD3404 


01200 




INC 


(IY+4) 


7BC0 FD3402 


01210 




INC 


(IY+2) 


7BC3 FD34B1 


01220 




INC 


(IY+1) 


7BC< FD3400 


01230 




INC 


(IT) 


7BC9 DDCB005E 


01240 


CL18 


BIT 


3, (IX) 


7BCD 280F 


01250 




JR 


X.CL11 


7BCP FD3405 


01269 




INC 


(IY+5) 


7BD2 FO3404 


91279 




INC 


(IY+4) 


7BD5 FD3403 


91289 




INC 


(IY*3) 


7BDB FD34I1 


11291 




INC 


(IY + 1) 


7BOB FD3400 


91399 




INC 


(IY) 


7BDE DDCB0066 


91319 


CL11 


BIT 


4, (IX) 


7BE2 281* 


91320 




JR 


I.CL12 



COMPLETE ASSEM 
Playing "God" 



7BE4 


FD3403 


81330 




INC 


(IY*1) 


7BE7 


FD3402 


01340 




INC 




7BEA 


FD3400 


01350 




INC 


(IY) 


7 BED 


DDCB006E 


01360 


CL12 


BIT 




7BF1 


2899 


01370 




JR 


Z.CL13 


7BP3 


PD3493 


01380 




INC 




7BF6 


PD3492 


01390 




INC 


(IY*2) 


7BP9 


FD3491 


01400 




INC 


(IY*1) 


7BFC 


DDCB9146 


01410 


CL13 


BIT 


0, (IX+1) 


7C00 


2896 


01420 




JR 


Z.CL14 


7C02 


FD3494 


01430 




INC 


(IY*4) 


7C05 


FD3402 


01440 




INC 


(IY+2) 


7C08 


DDCB0156 


01450 


CL14 


BIT 


2,(IX*1) 


7C0C 


2009 


01460 




JR 


Z.CL15 


7C0E 


FD3404 


01470 




:nc 


(IY+4) 


7C11 


FD3492 


61486 




INC 


(IY*2) 


7C14 


FD3499 


01499 




INC 


(IY) 


7C17 


DDCB9166 


01500 


CL15 


BIT 




7C1B 


2806 


01510 




J* 


Z.CL16 


7C1D 


FD3402 


01520 




INC 


(IY+2) 



Instructions for Play 

Instructions for Playing "God" with Life 

This listing may be entered using the Radio Shack Edi- 
tor/Assembler in order to produce the Life object code. A 
machine with 16K memory is sufficient to hold this source 
listing. 

After entry of this listing is complete, an object code may 
be produced; owners of EDTASM 1.1 will get seven FIELD 
OVERFLOW error messages on lines 800, 830, 870, 910, 940, 
980 and 1030 indicating a negative offset for IX. However, the 
line will assemble correctly, and this error message may be ig- 
nored; later versions of EDTASM have corrected this flaw. 

After the object code has been produced, be sure to save 
several copies of both it and the source code for future 
reference or modifications. 

In order to load and run Playing "God" with Life: 

1. Power-up the TRS-80, or type SYSTEM [ENTER] /0 [ENTER]. 

2. Respond to MEMORY SIZE? with 23700 [ENTER]. 

3. Insert the object tape, type SYSTEM [ENTER], and respond 
to the *? prompt with the name you used to assemble the ob- 
ject code. (I use "LIFE9"). 

4. If all is well, the screen will read: 



• • LOADING LIFE9 ' ' * WAIT FOR "GOOD LOAD 1 



THEN ENTER T 



5. When the tape has finished loading, the screen will display: 



GOOD LOAD 



6. Type a slash (0 and [ENTER]. 

The screen will clear, followed by the introductory text. 
When you have finished reading the text, you have the oppor- 
tunity to call for an on-screen generation count: 

GENERATION COUNT? ENTER 1 FOR ON-SCREEN COUNT, FOR NO COUNT 

Press 1 or (ENTER not necessary), then: 

ENTER TO RETURN TO BASIC, THEN LOAD OR PROGRAM CIVILIZATIONS 

Press [ENTER] 
Now you may either: 
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BLY LISTING FOR 
with Life 



7C28 


FD343B 


31531 




INC 


(IT) 


7C23 


DDCB3F4E 


31543 


CL16 


BIT 


1. (IX»3FH) 


7C27 


2M3 


31551 




JR 


Z.CL17 


7C29 


FD34I1 


21558 




INC 


i mi) 


7C2C 


DDCB4B46 


31571 


CL17 


BIT 


3, (IX-43H) 


7C3B 


2886 


81588 




JR 


Z.CL18 


7C32 


FD34I1 


81598 




INC 


(IY+1) 


7C35 


PD3438 


81688 




INC 


(IY) 


7C38 


DDCB484E 


31618 


CM 8 


BIT 


1 . I [X*4BH i 


7C3C 


2686 


81628 




JR 


Z.CL19 


7C3E 


FD3401 


81638 




INC 


(IY*1) 


7C41 


FD34B8 


81648 




INC 


(IY) 


7C44 


DDCB414 6 


81658 


CL19 


BIT 


8, ■: I X » 4 1 H i 


7C4B 


2«f} 


01668 




JR 


Z.CL28 


7C4A 


FD34BB 


81673 




INC 


(IY) 


7C4D 


DD23 


81688 


CI.20 


INC 


IX 


7C4F 


D9 


81698 




EXX 




7C53 


C33C7D 


81788 
81710 




JP 


HOLD 






81728 


; SEE 


IF ALL 


POSITIONS CHE 






81738 









1) Enter your own program in BASIC, or 

2) Enter the STARTS program (Listing 6). 

Notes on Writing Your Own Program: 

1. Use POKE statements for graphics, never PRINT or 
PRINT®. You may POKE graphics on the video display from 
locations 15360 to 16383. For example, POKE 15392.191, will 
give a graphics block (191) a seat halfway into the top line. 
SET and RESET may also be used. 

2. Use ASCII character 128 for a space, not CLS. (Listing 8). 

3. The last program statement before Life must be M% = 
USR(O), although any variable may be used in place of M%. 
The correct starting address for Life has been put in place by 
the Life system program (see text). 

Summary of using the god cursor control. 

1. Press G: Mortal time is suspended and GOD -» flashes on the 
screen. 

2. Move GOD -* up, down, left or right by using the four 
keyboard arrows; be careful if you go off the screen (see text). 

3. When GOD — is pointed at a block of cells: Press B to enter 
the BIRTH mode, or Press K to enter the KILL mode. An 
asterisk (*) will appear as a prompt. 

4. Press 0, 1, 2, 3, 4, or 5 to BEAR or KILL a cell. (Fig. 2.) 

5. You may: 

Press B or K plus through 5 again 

Move GOD— with the 4 arrows, or 

Press M to return to mortal time; Life con- 

tinues 




1 

2 3 

4 5 



Fig.2. Note that cells 4 and 5 are below the baseline of the word. 



7C53 0B 


817 43 FATSO 


DEC 


BC 


7C54 78 


01758 




u 


A,B 


7C55 Bl 


B176B 




OR 


C 


7C56 C2367B 


81778 




JP 


NZ, START 


7C59 813884 


8178B 




u 


BC.4B0H 


7C5C D9 


81798 

81889 ; 




EXX 






31813 | 


MAKE 


GENERATIONAL CHANGES 




81828 ) 








7C5D 21FF68 


81838 




LD 


HL.STOREOFFH 


7C68 Dl 


21840 KCRKN 


pop 


DE 


7C61 7A 


01858 




LD 


A.D 


7C62 FE82 


81860 




OF 


2 


7C(4 2B3A 


B1R72 




JR 


Z.NXT1 


7C66 FEB3 


21680 




(.P 


3 


7C68 2834 


01893 




a 


Z.S-6 


7C6A CBA6 


31933 




RES 


4, (HL) 


7C6C 1832 


81913 




JF 


$♦4 


7C5E C3E6 


81928 




SET 


4,(HL) 


7C78 7B 


81939 NXT1 


LD 


A,E 


7C71 FEB2 


01940 




CP 


2 


7C7 3 288A 


81950 




JR 


Z,NXT2 


7C75 FE83 


01960 




CP 


3 


7C77 2884 


81978 




JR 


Z,S-6 


7C7 9 CBAE 


21980 




RES 


5, (HL) 


7C7B 1602 


81990 




JR 


S+4 


7C7D CBEE 


02000 




SET 


5, (HL) 


7C7F Dl 


02B1B NXT2 


POP 


DE 


7C83 7A 


82020 




LD 


A,D 


7C81 FE02 


02030 




CP 


2 


7C83 280A 


02048 




JR 


Z.NXT3 


7C85 FEB3 


B2858 




CP 


3 


7C87 28*4 


B206B 




JR 


Z,$+6 


7C89 CB96 


32070 




RES 


2, (HL) 


7C8B 1832 


02B80 




JR 


$+4 


7C8D CBD6 


02090 




SET 


2,(HL) 


7C8F 7B 


02100 NXT3 


LD 


A,E 


7C9B FEB2 


02110 




CP 


2 


7C92 288A 


02120 




JR 


Z.NXT4 


7C94 FEB3 


02133 




CP 


3 


7C96 2884 


82148 




JR 


Z,$*6 


7C98 CB9E 


B215B 




RES 


3, (HL) 


7C9A 18*2 


32163 




JR 


5*4 


7C9C CBDE 


02178 




SET 


3,(HL) 


7C9E 01 


82188 NXT4 


POP 


DE 


7C9F 7A 


82198 




LD 


A.D 


7CA8 FEB2 


32238 




CP 


2 


7CA2 28BA 


82213 




JR 


Z.NXT5 


7CA4 FEB3 


02228 




CP 


3 


7CA6 2884 


82230 




JR 


z,S-6 


7CA8 CB86 


82248 




RES 


8,(HL) 


7CAA 1B32 


82253 




JR 


S*4 


7CAC CBC6 


02260 




SET 


8. (BL) 


7CAE 7B 


32273 NXT5 


LD 


A,E 


7CAF FEB2 


82288 




CP 


2 


7CB1 28BA 


82293 




JP 


Z.NXT6 


7CB3 PE33 


82388 




CP 


3 


7CB5 2834 


32310 




JR 


Z.S.6 


7CB7 CB8E 


82323 




RES 


1,(HL) 


7CB9 iee2 


82338 




JP 


$♦4 


7CBB CBCE 


82348 




SET 


l.(HL) 


7CBD 2B 


82353 NXT6 


DEC 


HL 


7CBE D9 


82363 




EXX 




7CBF SB 


82378 




DEC 


nc 


7CC8 78 


82388 




I.I) 


A.B 


7CC1 Bl 


02398 




OP 


c 


7CC2 2332 


82488 




JR 


NZ, S*4 


7CC4 1884 


02418 




JR 


MILB 


7CC6 D9 


82428 




EXX 




7CC7 C36B7C 


02438 
82448 




JP 


SCREN 




82453 


BLANK ONE BORDER OF BITS 




82468 


TH I S 


PREVENTS 


WRAPAROUND EF 




82478 








7CCA 86BP 


02480 


I I.H 


LD 


B.BFH 


7CCC 114830 


82498 




LD 


DE, 4011 


7CCF DD21FF5C 0250B 




LD 


IX.5CFFH 


7CD3 DDCB008E 02510 


AAZ 


RES 


1 , (IX) 


7CD7 DDCB8B9F. 0252B 




RES 


3, (IX) 


7CDB DDCB88AE B2S30 




RES 


5, (IX) 


7CDF DD19 


82548 




ADD 


IX, DE 


7CE1 1BFB 


82558 
02568 




DJNZ 


ZAAZ 




B257B 


RESTORE VIDEO FROM WORKSPAC 




B258B 








7CE3 21B35D 


02598 




LD 


HL, STORE 


7CE6 11003C 


82638 




LD 


DE, VIDEO 


7CE9 B18B04 


82613 




LD 


BC.48BH 


7CEC EDB8 


82628 
82630 




LDIR 






e2643 


CHECK GENERATION COUNT STA' 




82658 








7CEE 21F47A 


82668 




LD 


HL.7AF4H 


7CF1 7E 


32678 




LD 


A,(HL) 


7CF2 FEfll 


32688 




CP 


1 


7CF4 C2387D 


826 93 
82783 


1 


JP 


NZ.NOCNT 




22718 


COUNT AND CONVERT TO ASCII 




82728 








7CF7 8632 


82733 




:.o 


B,2 


7CF9 11FF3F 


02748 




LD 


DE.3FFFH 


7CFC 21F27A 


02758 




LD 


HL.7AF2H 


7CFF 7E 


02760 




LD 


A,(HL) 


7D88 3C 


82778 




I K 


A 


7081 27 


02780 




DAA 




7D82 77 


82790 




LD 


(HL! ,A 


7DB3 3807 


02800 




JR 


NC, S*9 


7D85 3F 


02810 




CCP 




7086 23 


02B20 




INC 


HL 


7037 7E 


82838 




LD 


A, (HL) 


7DB8 3C 


82848 




INC 


A 


7D89 27 


82858 




DAA 




7D0A 77 


82860 




LD 


(HL) ,A 


7D0B 2B 


8287B 




DEC 


HL 


7DBC AP 


B288B 




XOR 


A 


7DBD ED67 


82698 




RRD 




7O0P C638 


82938 




ADD 


ft, in 


7011 12 


32918 




LD 


(DE) ,A 


7D12 D63B 


82928 




sun 


3BH 


7D14 ED67 


82938 




RRD 




7016 C633 


82948 




ADD 


A.30H 


7D18 IB 


32953 




DEC 


DE 


7D19 12 


32963 




LD 


(DE) ,A 
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7D1A 06)1 


82979 


SUB 


3SH 


7DE1 BE 


04200 


CP 


(HL) 


7D1C EIX7 


82989 


RRD 




7DE2 2647 


04210 


JR 


I.BIT3 


7D1E IB 


82998 


DEC 


DE 


7DE4 67 


64226 


RLCA 




7D1F 23 


83888 


INC 


HL 


7 DBS BE 


64238 


CP 


(HL) 


7D26 85 


83818 


DEC 


B 


7DE6 2853 


64246 


JR 


X.BIT4 I 


7D21 26E9 


83826 


JR 


NZ.S-1SH 


7DE8 87 


64256 


RLCA 






83838 i 






7DE9 BE 


84266 


CP 


(HL) 




83648 I CLEAR 


BLANKS 


AROUND NUMERALS TO AVOID 


7DEA 285P 


64276 


JR 


Z.BIT5 




63656 ; INTERACTION WITH GRAPHICS BITS 


7DEC 216236 


64286 


LD 


HL.3882H 




63666 ; 






7 DBF BE 


64296 


CP 


(HL) 


7D23 21PB3F 


63676 


LD 


HL.VIDE0+3FBH 


7DF6 26DE 


64366 


JR 


NX, POOO 


7D2( CB8B 


63686 


RES 


1,(HL) 


7DF2 2AF87A 


84310 


LD 


HL,(7AF8H) 


7D28 CB9E 


63696 


RES 


3,(HL) 


7DP5 DD7585 


64320 


LD 


(IX+51.L 


7D2A CBAE 


03188 


RES 


5,(RL) 


7DF8 C3AB7E 


84339 


JP 


HELD 


7D2C 9664 


63116 


LD 


B,4 




04340 I 






7D2B 21BP3F 


63128 


LD 


HL, VIDEO* 3BFH 




64356 I STAR! 


ROUTINES TO KILL OR BEAR BITS 


7D31 CBA< 


63136 BLUNK 


RES 


4,(HL) 




64366 t 






7D33 CBAE 


63146 


RES 


5,(HL) 


7DFB AF 


64378 BIT6 


XOR 


A 


7D3S 2B 


63158 


DEC 


HL 


7DPC B8 


64386 


OR 


B 


7D36 1BP9 


63166 


DJN2 


BLUNX 


7DPD 2886 


84396 


JR 


NZ.S+8 


7D3S D9 


63176 NOCNT 


EXX 




7DFF DDCBB486 


84488 


RES 


6, (IX+4) 


7D3» C3237B 


63166 


JP 


PHIL 


7E63 1654 


64416 


JR 


STAR 




63196 i 






7E65 DDCB64C6 


64426 


SET 


6, (IX+4) 




63268 J KEYBOARD SCAN 


FOR HOLD, GOD, BASIC 


7E69 184E 


64436 


JR 


STAR I 




63216 ; 






7E6B AP 


64446 BIT1 


XOR 


A 


7D3C 211238 


63226 HOLD 


LD 


HL,3862H 


7E6C B6 


64456 


OR 


B 1 


7D3P 3E61 


63238 


LD 


A,l 


7E6D 2666 


64466 


JR 


■6,6*8 


7D41 BE 


83246 


CP 


(HL) 


7E6F DDCB848E 


64476 


RES 


l,(IX+4> 


7D42 28PB 


63256 


JR 


1,8-6 


7E13 1644 


64486 


JR 


STAR 1 


7D44 218838 


63268 


LD 


HL,3668H 


7E1S DDCB64CE 


64498 


SET 


l.UX+4) 


7D47 BE 


63278 


CP 


(HL) 


7E19 183E 


64566 


JR 


STAR 


7048 26IS 


13288 


JR 


NZ,$+7 


7E1B AF 


64 516 BIT2 


XOR 


A 


7D4A ED7BFE7F 


63296 


LD 


SP, (7FPEH) 


7E1C B6 


64 526 


OR 


B 


7D4B C9 


63366 


RET 




7E1D 2866 


64538 


JR 


NX, $+8 


7D4P 218138 


63316 


LD 


HL,3861B 


7E1F DDCB8496 


64546 


RES 


2, (IX+4) 


7D52 3E8B 


63328 


LD 


A,88H 


7E23 1834 


84558 


JR 


STAR 1 


7DS4 BE 


83338 


CP 


(HL) 


7E2S DDCB64D6 


84568 


SET 


2, (IX+4) 


7DS5 2887 


63348 


JR 


1,8+9 


7E29 182E 


64578 


JR 


STAR | 


7D57 C3537C 


83356 


JP 


FATSO 


7E2B AP 


84588 BIT3 


XOR 


A 


70SA 23 


83369 CARRY 


INC 


HL 


7E2C B8 


64590 


OR 


B 


7DSB 34 


63376 


INC 


(HL) 


7E2D 2806 


84688 


JR 


■1,1*1 


7D5C 2B 


63386 


DEC 


HL 


7E2P DDCB849E 


04610 


RES 


3, (IX+4) 


7DSD C9 


63396 


RET 




7E33 1824 


04620 


JR 


STAR 




63466 | 






7E35 DDCB84DE 


04630 


SET 


3, (IX+4) 




63418 ; PLASHING "GOD 


* SEQUENCE STARTS 


7E39 1B1E 


04640 


JR 


STAR 




63426 i 






7E3B AF 


04650 BIT4 


XOR 


A 


7DSE DD218B3C 


63436 


LD 


IX, VIDEO 


7E3C B9 


04660 


OR 


B 


7M2 DDES 


63446 GODB 


PUSH 


IX 


7E3D 2666 


04670 


JR 


NZ.S+8 


7D«4 El 


63458 


POP 


HL 


7E3P DOCB84A6 


84688 


RES 


4, (IX+4) 


7DC5 11F87A 


63466 


LD 


DE.7AP8H 


7E43 1814 


84696 


JR 


STAR 


7M8 818488 


63476 


LD 


BC,4 


7E45 DDCBB4E6 


84766 


SET 


4, (IX+4) 


7D6B EDB8 


63486 


LOIR 




7E49 188E 


64716 


JR 


STAR 


7MD DD368B47 


63496 


LD 


(IX),47K 


7E4B AF 


64728 BITS 


XOR 


A 


7D71 DD36814F 


83586 


LD 


(IX+1),4FH 


7E4C B0 


647 36 


OR 


B 1 


7D7S DD36B244 


63518 


LD 


(IX+2),44H 


7E4D 2666 


64746 


JR 


■1,6*1 


7D79 DD36835E 


63526 


LD 


(IX+3),5EH 


7E4F DDCB84AE 


64756 


RES 


5, (IX+4) 


7D7D CD827D 


83536 


CALL 


DELAY 


7E53 1884 


64766 


JR 


STAR 


7D88 1889 


83541 
83556 ; 


JR 


SCANA 


7E55 DDCB04EE 


84778 
84788 i 


SET 


5, (IX+4) 




63566 ; DELAi 


ROUTINE 


PLACED BEFORE ACTION 




04790 I ROUTINES TO 


DELETE STAR AND 




63576 J PRODUCES DELIBERATE PROSTRATION 




04800 ; RESTORE ORIGINAL IMAGE HIDDEN BY "GOD* 




63588 ; 








04816 ; 






7D82 21881A 


63596 DELAY 


LD 


HL.1A66H 


7E59 2AF87A 


64826 STAR 


LD 


HL, (7AF0H) 


7DSS 2B 


63666 


DEC 


HL 


7 ESC DD7565 


04630 


LD 


(IX+5),L 


7D86 7C 


83616 


LD 


A,H 


7E5F C3A37D 


04046 


JP 


EDIT 


7D87 B5 


83626 


OR 


L 


7E62 ED4BF87A 


64 656 ONCE 


LD 


BC, (7AF8H) 


1 7088 28PB 


63636 


JR 


MX, 1-3 


7E66 DD7186 


64866 


LD 


(IX),C 


7D8A C9 


63648 


RET 




7E69 DD7B61 


64876 


LD 


(IX+D.B 




63656 I 






7E6C ED4BPA7A 


84888 


LD 


BC,(7AFAH) 




83666 I SCAN 


POR MOTION OF "COD" CffiiTIiCL 


7678 DD7162 


84896 


LD 


(IX+21.C 




63676 i 






7E73 DD7883 


64900 


LD 


(IX+3),B ] 


1 7D8B 214838 


63686 SCANA 


LD 


HL.3846H 


7E76 C9 


04910 


RET 




7DSE 3E88 


63698 


LD 


A, 6 




04920 i 






7D98 BE 


63766 


CP 


(HL) 




64936 ) ROUTINES TO 


PRODUCE MOTION OF *GOD* 


7D91 CA827E 


63718 


JP 


X.UPAR 




64946 ; 






7D94 87 


63726 


RLCA 




7E77 CD627E 


64956 PRTAR 


CALL 


ONCE 


7D9S BE 


63738 


CP 


(HL) 


7E7A DD23 


64966 


INC 


IX 


7D9C CA917E 


637 48 


JP 


X.DNAR 


7E7C CD827D 


64976 


CALL 


DELAY 


7D99 87 


83756 


RLCA 




7E7P C3627D 


64986 


JP 


GODB 


7D9A BE 


63766 


CP 


(HL) 


7E82 CD627E 


04999 UPAR 


CALL 


ONCE 


7D9B CAA87E 


83778 


JP 


Z.BCKAR 


7E8S 8648 


05666 


LD 


B.46H 


7D9E 87 


83788 


RLCA 




7E87 DD2B 


05818 


DEC 


IX 


7D9P BE 


63799 


CP 


(HL) 


7EB9 16FC 


85626 


DJNX 


8-2 i 


7DA9 CA777E 


83888 


JP 


Z.FRTAR 


7E8B CD827D 


65638 


CALL 


DELAY 




83818 i 






7E6E C3627D 


65646 


JP 


GODB i 




63826 ; SCAN 


KEYBOARD 


FOR KILL, BEAR, MORTALITY 


7E91 CD627E 


65050 DNAR 


CALL 


ONCE 




63836 ) 






7E94 6646 


05060 


LD 


B.46H 


7DA3 218238 


63846 EDIT 


LD 


HL.3682H 


7E96 DD23 


05070 


INC 


IX 


7DAC 3E88 


63856 


LD 


A, 8 


7E96 16PC 


85888 


DJNZ 


6-2 


7DA8 BE 


63868 


CP 


(HL) 


7E9A CD827D 


85899 


CALL 


DELAY 


7DA9 2814 


83678 


JR 


1,6*1631 


7E9D C3627D 


65166 


JP 


GODB 


7 DAB 2D 


63886 


DEC 


L 


7EA6 CD627E 


65116 BCKAR 


CALL 


ONCE 


7DAC IF 


83896 


RRCA 




7EA3 DD2B 


65126 


DEC 


IX 


70AD BE 


83966 


CP 


(HL) 


7EAS CD827D 


65136 


CALL 


DELAY 


7DAE 2813 


63916 


JR 


6,6*136 


7EA8 C3627D 


65146 


JP 


GODB 


7 DM 23 


63928 


INC 


HL 


7EAB CD627E 


65156 HELD 


CALL 


ONCE 


7DB1 3E28 


83936 


LD 


A.2SH 


7EAE 31EF7A 


65166 


LD 


SP.7AEPH 


7DB3 BE 


83948 


CP 


(HL) 


7EB1 C3237B 


65176 


JP 


PHIL 


7DB4 CAAB7E 


63958 


JP 


Z , HELD 




65188 j 






7DB7 CD627E 


■ 3968 


CALL 


ONCE 




85196 j ROUTINES TO 


DISPLAY SCREEN TEXT 


7DBA CD827D 


83976 


CALL 


DELAY 




85268 j AT BEGINNING OP PROGRAM, INCLUDING 


7DBD 18*3 


83968 


JR 


GODB 




65216 i DELAYS, GENERATION COUNT CHOICE, 


7DBP 8688 


83998 


LD 


B,9 




85220 j AND 


RETURN 


TO BASIC CONTROL 


7DC1 1882 


84888 


JR 


5*4 




85236 | 






7DC3 6661 


84818 


LD 


B,l 


6268 


65240 


ORG 


6266H 


7DCS 21PB7A 


84828 


LD 


HL.7APBH 




05250 I 






7DC8 DD7E85 


84636 


LD 


A,<IX+5) 




05266 1 CLEAR SCREEN AND HOLD CLEAR 


7DCB 77 


64646 


LD 


(HL),A 




05270 i 






7DCC DD368S2A 84858 


LD 


(IX+S),2AH 


6266 CDSC62 


05266 


CALL 


PLOP 




64666 I 






6263 6616 


65296 


LD 


B.16H 




64676 i SCAN 


FOR BIT 


TO KILL OR BEAR 


6265 CD627D 


65366 STAY1 


CALL 


DELAY 




64666 » 






6268 16PB 


65316 


DJNX 


STAY1 


7DD8 211838 


64696 POOO 


LD 


HL.3816H 




65326 I 






7D03 3E81 


64166 


LD 


A,l 




65330 I DISPLAY FIR0T TWO LINES OF TEXT 


7DD3 BE 


64116 


CP 


(HL) 




65340 i 






7D06 2623 


84126 


JR 


Z.BIT6 


626A 21P762 


05350 


LD 


HL.PLAY 


7DDS 87 


64136 


RLCA 




626D 11153C 


05360 


LD 


DE,VIDEO+lSB 


7DD9 BE 


64148 


CP 


(HL) 


6216 611566 


05370 


LD 


BC.ISB j 


7DDA 282P 


64156 


JR 


X.BIT1 


6213 EDB6 


05386 


LDIR 




T.DDC 11 


14161 


RLCA 




6215 21523C 


85396 


LD 


HL.VIDEO+52H 


7 ODD BE 


64178 


CP 


(HL) 


6218 061B 


65466 


LD 


B, IBB 


7DDE 2B3B 


84188 


JR 


Z.BIT2 


621A 363D 


65416 OLSE 


LD 


(HD.3DH 


7 DEB 87 


64196 


RLCA 




621C 23 


65426 


INC 


HL 
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INFINITE BASIC 

For MOD I TRS-80™ Tape and Disk Systems 



DISK SORT MER8I 'DSM' 

For MOD I and MOD II TRS-80™ 



Extensions to Level II and Disk BASIC $49.95 

Full MATRIX Functions — 30 BASIC commands! ! 

Mathematical and common matrix functions. Change arrays in 

mid-program. Complete array handling. Tape array read and write, 

including strings. Common subroutine calls. 

Over 50 more STRING Functions as BASIC commands!! String 

manipulation, translation, compression, copying, search, screen 

control, pointer manipulation and utility functions. Includes 

multikey multivariable machine language sorts. Load only machine 

language functions that you want! Where you want in memory! 

Relocating linking loader! More than you ever expected!! 

oo BUSINESS (Requires Infinite BASIC) $29.95 

20 Business oriented functions including: 

Printer Automatic Pagination with headers and footers! 

Packed Decimal Arithmetic ( + ,-,*,/) 127 digits! 

Binary array searches and hash code generator! 

COMPROC Command Processor for Disk Systems $19.95 

Auto your disk to perform any sequence of DOS commands, 
machine language loads, BASIC, memory size, run program, 
respond to input statements, etc. Single BASIC command file 
defines execution! Includes auto key-debounce, screen print and 
lower case software driver. 

REMODEL + PROLOAD Specify 16, 32, or 48K Memory $34.96 

REnumber any portion or all of BASIC program. MOve any portion 

of program from one location to another. DELete program lines. 

MERGE all or any portion from tape. Save and verify portion or 

all of combined merged programs to tape. 

QSF (Specify 16, 32, or 46K) $24.95 

18 Machine language routines. Includes RACET sorts. 

C J?,? K «J V,S /' M,C £?.'P- DEALER INQUIRIES INVITED 

t . u «L **. ° . St,-.!.*, ,-.. WHEN ORDERING PLEASE 

Telephone Orders Accepted (714) 637*5016 advise publication source 

TWS-eOIS A REGISTERED TRADEMARK OF TANDY CORPORATION 



.... Now you can sort an 85K diskette _.._ 

FAST — jn less than 3 minutes* - FAST 

Perfect for your multi-diskette RANDOM file mailing lists, inven- 
tory, etc. Ideal for specialized report generation. Sort, merge or 
combination. All machine language stand-alone package — 
Efficient and easy to use. No separate key files required! Physical 
records are rearranged on diskette! Supports multiple sub records 
per sector including optional sector spanning. Sorts on one or 
more fields — ascending or descending. Sort fields within records 
may be character, integer, and floating-point binary. Provides 
optional output field deletion, rearrangement, and padding. 
'Sort timings shown below are nominal times. Times will vary 
based on sort and system configurations. Nominal times based 
on Mod 1 48K 4-drive configuration, 64 byte records, and 5 sort keys. 

TYPE FILE SIZE SORT TIME TYPE FILE SIZE SORT TIME 





(Bytes) 


(Sac) 




SORT 


16K 


33 


SORT 


SORT 


32K 


49 


SORT 


SORT 


85K 


173 


SORT and 


SORT 


170K 


445 


MERGE 



(BUM) (Sec) 

340K 1081 

680K 2569 

85KSORT+ 1757 

1275K Merge 

DSM for Mod I (Minimum 32K, 2-drlves) $75 On-Dlsk 
DSM for Mod II (Minimum 64K, 1 -drive) $150 On-Dlsk 

Mod II Development Package $100 

Machine Language SUPERZAP, plus Editor/Assembler and 
Disassembler patches. 
Mod II Generalized Subroutine Facility 'GSF' $50 



►^41 



£■ RACET COMPUTES -j 
7tt Pal meal e. Oreftte CA 12165 



/* 



EDITOR ASSEMBLER 

TRS-80" Model U 



\ 





from GALACTIC SOFTWARE 

EDAS 4.0 is the first user oriented Editor Assembler and was designed to utilize all the 
features of your Model II and TRSDOS operating system. EDAS 4.0 includes innovative 
features for ease of coding and debuging. EDAS 4.0 package includes complete, accurate 
documentation (over 120 pages). t tf»oral"i /\/\ 

only $ZZ7.UU 

also from Galactic . . . 

MAIL/ FILE — A true name, address & phone number data base management system. The most versatile 
system of its kind. Up to 2,500 records per file. $199.00 

HOST I/O — Make full use of your Model H's communications ability. Your "BASIC" programs can now 
make use of the Model H's RS232 channels, with this full-featured "KSR" system. $199.00 

GALACTIC SOFTWARE LTD. Dept. 8A, 1 1 520 N. Port Washington Rd., Mequon, Wl 53092 
^254 (414) 241-8030 

COD & Money Orders - Shipped Immediately Check Orders - Allow two weeks. 



Vs 



• Reader Service - see page 162 
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«2iD lira 


95431 




DJM 


QLflE 




166 84 


DErM 'THEN LOAD OR PROGRAM CIVILIZATIONS.' 




621P 21*C63 


95441 




U> 


HL.COPY 




466 90 | 










(222 HCtlC 


8S459 




LD 


DE,VIDEO+«C«« 




86719 , 


DISPLAY "GOOD LOAD" AT 


END OP LOAD 






622S (14*** 


•S46f 




LD 


BC.4IH 




•6710 | 


TO ASSURE USER OP GOOD 


LOAD (WHAT ELSE?) 






C228 EDM 


• 5479 
95489 




LOIR 






06720 | 
•673* 


ORG 3C56H 










95499 


DISPLAY NEXT 


GROUP OP LINES WITH 




•674* 










95599 


DELAY PROM LETTER TO LETTER 




•(75* 


END 62IIB 










• 5519 


1 


















622A 214C63 


95529 




LD 


HL, INSTR 














622D 114130 


• 553* 




LD 


DE,VIDEO+14IB 


DOLC 


62AF 


HELD 


7EAB CL18 7C3 3 




(230 46FF 


95549 




LD 


B.irrs 


BASC 


6SCB 


EDIT 


7DA3 CL17 7C2C 




6232 CD3CC2 


95559 




CALL 


WRDS 


CLID 


629C 


FRTAR 


7E77 CL16 7C23 




4235 MCI 


955(9 




LD 


B.9C1H 


CLOD 


(29A 


BCKAR 


7EA0 CL1S 7C17 




6237 C03C62 


95579 




CALL 


WRDS 


GEN 


(2BA 


MM 


7E91 CL14 7C18 




623A 1BIC 


95589 




JR 


HERE 


POKE 


626A 


UPAR 


7E82 CL13 7BFC 




623C 7E 


95599 


MM 


LD 


A, (HL) 


STAY 2 


6255 


SCANA 


7D8B CL12 7BED 




623D 12 


95699 




LD 


(DE).A 


PLUS 


659C 


DELAY 


7D82 CL11 7BDE 




623E ES 


95619 




PUSH 


U, 


HERE 


6248 


GODB 


7D62 CL11 7BC9 




623F CDB27D 


95629 




CALL 


DELAY 


WRDS 


623C 


CARRY 


7D5A CL19 7BB4 




(242 El 


95(39 




POP 


HL 


INSTR 


634C 


BLUNK 


7D31 CL*8 7BA5 




(243 23 


95649 




INC 


HL 


COPY 


630C 


NOCNT 


7D3S CL97 7B96 




6244 13 


95659 




INC 


DE 


QLSE 


621A 


ZAAZ 


7 CD 3 CLM 7B8A 




624S 11F5 


95669 




DJNZ 


WRDS 


PLAY 


62F7 


MI LB 


7CCA CLI5 7B7B 




6247 C9 


• 5679 




RET 




STAY1 


62*5 


NXT6 


7CBD CL*4 7B6F 




624* 210C6S 


95(88 


HERE 


LD 


HL.PLUS 


PLOP 


625C 


NXT5 


7CAE CL*3 7B66 




624B 1H03F 


(5(99 




LD 


DE,VIDEO+34IH 


STAR 


7E59 


NXT4 


7C9E CL*2 7B5A 




624E MBr 


95799 




LD 


B,*BTH 


BIT5 


7E4B 


NXT3 


7C8F CL91 7B4E 




6250 C03C62 


95719 




CALL 


WRDS 


BIT4 


7E3B 


NXT2 


7C7r START 7B36 




62S3 HSI 


• 5729 




LD 


B.59H 


BIT3 


7E2B 


NXT1 


7C70 LIFE 7B32 




62SS CD627D 


15739 


STAY 2 


CALL 


DELAY 


BIT2 


7E1B 


SCREN 


7C6* PHIL 7B23 




62S8 1IFB 


9574* 




DJNZ 


STAY 2 


BIT1 


7 EBB 


FATSO 


7C53 BLINK 7B1E 




625A lilt 


95759 




JR 


POKE 


BIT* 


7DrB 


HOLD 


7D3C BLANK 7B14 






957(9 


1 






POOO 


7DD9 


cut 


7C4D STORE 5D** 






•577« 


j CLEAR SCREEN 


SUBROUTINE 


ONCE 


7E62 


CL19 


7C44 VIDEO 3C*9 






• 5789 


1 


















625C 01FF03 


95799 


PLOP 


LD 


BC.3PFH 














625P 21I63C 


95899 




LD 


HL, VIDEO 














6262 11I13C 


95819 




LD 


DE.VIDEO+1 














626 5 36 86 


95829 




LD 


(HL) , 8»H 














6267 EDBC 


95939 




LDIR 
















6269 C9 


95949 
95859 
95869 
95979 


1 

; PUT 
1 


RET 

■USRI9)' 


ADDRESS IN PLACE 














626A 218E4I 


95889 


POKE 


LD 


HL,4(8EH 














626D 3616 


95899 




LD 


(HL),« 








f 




ml 


626F 23 


• 5910 




INC 


HL 






^r i 


f 






6279 367B 


■ 5919 




LD 


(HL) ,7BH 










ni 


ff' 


6272 CD5C62 


95929 

95939 


1 


CALL 


PLOP 






/ 1 


■ III £ 

J [l 1 f | 


m 


•j 




95949 


1 DISPLAY GENERATION COUNT PROMPT 






f \ ' 




/Jl 


V 




45959 


1 










SL I 






hk\ 


"« 


627 5 21BA62 


959(9 




LD 


I1L,GEN 






w ^^ l : 






mv 


•j 1 


6279 11993D 


95979 




LD 


Dt:,VIDEO+100H 






f ^W J | 






FVi 


It 


627B 813D01 


05980 




LD 


BC.3DH 






r ^^ 1 






I|U 


\ 


627E EDB0 


05990 

H6O00 


1 


LDIR 








X. J 








J 




06010 


; SCAN 


KEYBOARD FOR RESPONSE 






^^jl 






,y 




06020 


; 
















km* >i 


if 


6269 21193B 


06030 




LD 


HL.3810H 








1 




III 




6283 3E01 


06940 




LD 


A,l 












r I ' 


6285 BE 

6286 2896 


96050 
06060 




CP 
JR 


(HL) 
Z,S*08H 




I { 










u 


6288 3C 

6289 BE 


0607 
06080 




INC 
CP 


A 

(HL) 




<T 




1 ^"""■>»» 




^jff^ 


2 


628A 2899 
628C 18F2 


06090 
06100 




JH 
JR 


Z,$+«BH 
$-«CH 






AA'j ,'M 


»UL | 




,*■<- 






06110 


1 








IV 


i 1 


^1 






06129 


I SET 


UP GENERATION COUNT STATUS FLAG 






ij ;. 


II 




62BE 21F47A 
6291 3699 


•6130 
•6149 
96159 


1 


LD 
LD 


HL.7AP4H 
(HL),* 


/ ■ 


: 


}\ 


VVi^ ',v\ 


c 




*.< 




6293 1895 


96169 




JR 


CLOD 






i > 


AW 




6295 21F47A 


•617* 




LD 


HL,7AF4H 




\ 




Iff - 




6298 3611 


86 160 




LD 


(HL),1 






vji 






•619* 


1 










t s 








06299 


; DELAY FOLLOWED BY RETURN TO BASIC 






1 ( 


^H 






96219 


I PROMPT AND KEYBOARD SCAN 






S / 


lH 1 






96229 


1 












s ? 






629A 9611 
629C CD827D 
629F 19FB 


9623* 
96244 
96259 


CLOD 
CLID 


LD 

CALL 

DJNZ 


B.lfH 
DELAY 
CLID 


















mm* 


■ 


M 




62A1 CD5C62 
62A4 21CB65 


9626* 
96279 




CALL 
LD 


PLOP 
ML, BASC 




'. 


m 1 1 


II III 






m ^^^ 




62A7 11993D 


96289 




LD 


Dt,VIDEO+lO0II 




■ i 


■ 1 


1 1 


II 




62AA 013F99 


9629* 




LD 


BC03FH 




■ a 




II 




6 2 AD EOBf 


96 399 




LDIR 








■■■■i \ 1 


III 


11 




62AF 211938 


•631* 


DOLC 


LD 


HL.381IH 




.■ 


liiiV 


1 1 1 1 1, 


■1 




62B2 3E91 


•6 321 




LD 


A,l 




J 


v. .V 


IE 




62B4 BE 


•633* 




CP 


(HL) 




■■■V 


11 




62B5 29F6 


•634* 




JR 


N I, DOLC 




■III 


II 






•635* 
96369 
96379 
•6381 


; 








llll 


fill \ 


\ t 


■■ 




62B7 C3191A 


; RETUicn hi basic (.uhtkul 
JP 1A19H 




r\ 


■■J" \ 


•.VJR H 


1 I 






•639* 


1 








\ 


™ ™"™3 ■ \ 




— td*l r V 


TlH 




M4M 


1 THE 


lines or 


TEXT FOLLOW AS A BLOCK 










iiip. j- 






96414 


) 












w^S 


UiLuL V 






■6421 


GEN 


DErM 


'GENERATION COUNT? ENTER 1 FOR ' 




\ ' i 


mmmmmmmmm 1 








■643* 




DErM 


'ON-SCREEN COUNT, • FOR NO COUNT' 








i r,vr4 






■644* 


PLAY 


DEPM 


'PLAYING GOD WITH LIFE' 




\ i 


____^_-_ 1 


K'h J 


LAjbW 






•647« 


INSTR 


DEPH 


"PLAYING GOD WITH LirE" IS A ' 






•UrbbVIB 1 y^ 


\\Mvu 






M4M 




DEPM 


'MATHEMATICAL PASTIME. THERE ARE NO 






^BBBW^K' ^^ 


\ fl * 
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'WINNERS OR LOSERS. YOU BECOME ' 
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\ 1 1 


i iii 






96549 




DErM 


'COMMIT THE UNIVERSE TO OBLIVION OR' 










II 




MSS« 




DErM 


'TO CREATE OR DESTROY INDIVIDUALS ' 










■ Itt 


1 




• 6569 




DErM 


'AT WILL. BUT POR YOU TO CHANGE' 
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> 




■6631 




DEFM 


•IP YOU REFER TO YOUR "PLAYING GOD ' 














MM! 




DEFM 


"WITH LIFE* INSTRUCTION SHEETS,' 
















M(5* 




DErM 


•YOU WILL BE ABLE TO CREATE ' 












WT 




06664 




DErM 


'YOUR UNIVERSE AND ITS CIVILIZATIONS 


. ' 










\' 




46671 


BASC 


DEPM 


'ENTER • TO RETURN TO BASIC, ' 















58 • SO Microcomputing, June 1980 



Instant Software New Releases 




CHESSMATE-80 This versatile chess op- 
ponent gives you a choice of ten levels of 
play, from the "blitz" level (the computer 
has three seconds to choose a move) to 
the "infinity" level (where the computer 
will consider every possible move, which 
could take years). The program is a con- 



servative player and follows all the ac- 
cepted rules of international play. 

You can let Chessmate teach you the 
moves. A single command has Chess- 
mate making the move for you. Another 
command can let you watch Chessmate 
deciding on a move. It's fascinating to see 
the computer go through all the alter- 
natives until it either runs out of time or 
finds the perfect move. 

Chessmate allows you to set up the 
board and play end games or special prob- 
lems. 

Watching Chessmate play itself and 
seeing the computer choose the best 
move is a fascinating sight. It will give you 
an excellent insight in the methods com- 
puters use to make decisions. 

Chessmate-80 plays such a good game, 
you might be embarrassed to play it in 
public. This program requires 2 TRS-80 
Level I or II 16K. Order No. 00S7R $9.95. 




DAREDEVIL The following collection of 
fast-action contests will test your reac- 
tions, your reflexes and quickness-of-eye 
during high-speed maneuvers: 
•SKI RACER -Hurtling down the ski- 
slopes, your task is to guide the skier past 
gates all the way down to the finish line. 
•Bob Sled- At high speed, the challenge 
is to avoid taking the curves too "high", 
because if you do, you could go "over-the- 
top" and easily crash! 
lndy-80 - You will need all the skill at your 
command, to avoid smashing into the 
other cars on the racetrack, and to steer 
clear of the curves! 
•Aero Target -The aircraft flash by your 



sights, and you get chances to shoot them 

down. 

•Auto Race -You attempt to steer your 

car past the car driven by the computer. 

The course is tricky, so be careful. 

• RACE- Steering a car around this 

course is a real challenge, it has potholes 

and some very tricky curves. But that is 

not all, because the road becomes 

gradually narrower! 

Don't be charmed by these innocent- 
looking titles. None of these contests are 
easy, in fact they all become very difficult, 
and you will be hard-pressed all the way! 
For the TRS-80 Level II 16K. Order 
NO.0082R. $9.95. 



BEGINNER'S RUSSIAN The three pro- 
grams in this package will give you on- 
screen displays of the Cyrillic letters, 
detailed instructions on their proper pro- 
nunciation, and exercises that will have 
you recognizing and speaking simple 
Russian words. 

This package is excellent for students, 
businessmen, scientists, and anyone 
who is interested in learning the Russian 
language. For the TRS-80 Level II 16K. 
Order No. 0136R $9.95. 
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MONEY MADNESS These two programs 
will let you experience the joy and 
headaches of being an industrial giant. 
•Millionaire -Can you manipulate $1000 
into a million dollars in fifteen years? It all 
depends upon your shrewdness and strat- 
egy, as you buy and sell properties, nego- 
tiate bank loans, collect rentals and ac- 
cept sealed bids. 

•Timber Baron -This is an in-depth expe- 
rience of the timber business, from the 
time you cut trees until your milled lumber 
reaches the market. 

Nothing in this life is easy, and you will 
face the hazards of fire, rotting lumber, 
equipment failure, strikes and sawmill 
problems. With some luck you will weath- 
er it all, to sell your lumber and make a 
huge profit! 

Money Madness is not just another 
game. These transactions are affected by 
real-life variables; those tough, unex- 
pected emergencies which can upset the 
most careful plans. For the TRS-80 Level II 
16K. Order No. 0156R $9.95. 



For a free catalog listing over 200 
programs write: Instant Software 
Catalog Dept., Peterborough, N.H. 
03458 

Prices subject to change without notice. 



EVERYDAY RUSSIAN This program will 
acquaint you with the words for various 
foods, places to eat, signs, and the names 
of stores — exactly what a traveller needs 
to know. 

You can practice typing in Russian. The 
program will allow you to type in letters, or 
words, using the complete Cyrillic alpha- 
bet. Practice writing words such as hotel 
names, tourist attractions, and street ad- 
dresses. All you need is a TRS-80 Level II 
16K. Order No. 0137 $9.95. 



Instant Software Inc. 
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PETERBOROUGH, N.H. 03458 
603-924-7296 



*• Reader Service — sa* page 162 



80 Microcomputing, June 1980 • 59 



Instant Software New Releases 



FOR THE TRS-80* 16K, 32K OR 48K. 

PROGRAMMING 
POWER! 

Let IRV put power 
in your keyboard 

Input shorthand: programmable keyboard up ' 
to 255 characters per key plus a pre-program- 
med command set. 

Relocate lines by simply changing the line 
number. Merge lines and relocate command 
blocks in the listing with simple one keystroke 
routine plus the Level II EDIT command. 

Video screen editor has full cursor control, full 
power over anything that appears on the screen 
including line listings and graphics. 
On cassette (DOS compatible) 
Order No.0250R $24.95. 




YOUR CRIBBAGE AND CHECKERS 

PARTNER 
•Cribbago — A popular two-person card 
game that nicely balances skill versus 
luck, attack versus defense and tactics 
versus strategy. This is not a tutorial pro- 
gram - it's a gameworthy adversary. 
•Checkers — This is an old favorite for 
most of us. Whether you call it checkers or 
draughts, it's still the most widely known 
board game in existence. 

Two modern classics, ready to team up 
with your TRS-80 and provide you with 
hours of challenge -the old-fashioned 
way. Order No. 0068R $9.95. 



nnzinfT 



EQUIVALENT VALUES 
BINARY 0000 0000 11 11 11 11 
HEXADECIMAL 00FF 
DECIMAL 255 
OCTAL 008 377 



zao 

DHZfl 



£ 



25 




SURVEYOR'S APPRENTICE This three 
part package will display on-screen 
diagrams of rectangles, circles, triangles, 
parallelograms, trapezoids and polygons, 
giving you the formulas to compute the 
area for each figure, and it will give you ex- 
amples of how to do the problems. The 
program will also quiz you and tell you 
how well you're doing. 

These programs are a terrific supple- 
ment for any high school geometry course 
for work both in and out of the classroom. 
For the TRS-80 Level II 16K. Order 
NO.0127R. $9.95. 



PROGRAMMER'S CONVERTER Have you 
always wanted to try your hand at Z80 as- 
sembly language, but were intimidated by 
all of those FO's, 4B's and D02A's? Once 
you begin using hexadecimal numbering 
you'll wonder how you did without it! 
This package contains these three pro- 
grams: 

1. Base Calculator -Turn your TRS-80 in- 
to a calculator which lets you convert 
numbers to any base from 2 through 16 
and perform calculations in that/those 
base(s). Memory, sign change, one's and 
two's complement are all available. It will 
even handle fractions. 

2. Hexadecimal/Decimal Conversion 
Training — A dual purpose program. First, 
it's a handy converter which changes 
decimal numbers to hexadecimal nota- 
tion (and vice versa). Second, it's a 
teaching/testing program that gives you 
practice in making those conversions 
yourself. 

3. Number Base Conversions -Converts 
any decimal, binary, octal, or hexadecimal 
number (up to $FFFF), to its equivalent 
value in the other three bases and dis- 
plays all four values simultaneously. 

With these aids, you'll be exploring the 
inner recesses of your TRS-80 Level II 16K 
in no time. Order No. 0058R. $9.95. 



Instant Software Inc. 



SKIRMISH-80 This four-part package is 
designed to let you leave the safety of 
your commonplace world and venture 
forth into another, more combative place 



and time 



>^ 




• Mission Impossible -This program re- 
quires both skill and luck to accomplish 
your mission in this real-time simulation. 
Your objective is to drive your tank into a 
prison courtyard, rescue a jailed prisoner 
and escape. Sound easy? It's not! 
•Trap — This is a two-player game, in 
which you must maneuver your opponent 
into a position where he is hopelessly 
trapped. Good luck! 

•Wipeout — A two-player game in which 
your mobile gun accumulates points by 
destroying as many obstacles as possible 
on a battlefield. 

•Block-em -A two-person competition in 
which your moving "snake" tries to block 
your opponent. You'll need a TRS-80 Level 
II 16K. Order No.0070R. $9.95 

Look tor Instant Software at a store near you. If the 
store nearest you does not stock Instant Software, 
use this order blank to purchase your software 
directly or call Toll-Free 1-800-258-5473. 

I 



Name 



Address 

Oty 



Stale 



.Zip 



D Check D Money order 

D VISA QAMEX Q Master Charge 

Card No 



Expiration Date . 
Signed 



Order your Instant Software today! 



Quantity 


Order No 


Unit Cost 


Total Cost 










































Handling 


$100 


Total Order 





L 



Instant Software Inc. Dept. 70F0 

Peterborough. N M 03456 USA i 



SEE INSIDE BACK COVER 

FOR LIST OF DEALERS 

NEAR YOU. 
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NOBODY CAN BEAT 
THE MATCHLESS 
QUALITY/DOLLAR RATIO! 

Others may charge less than Matchless, but their auality can't compare. Don't take our word for it. 

Ask a Matchless customer. His enthusiasm will convince you! Kfl^^^^e^^. 



MS-800 




Here's our line of quality products and the 
systems with which they're compatible: 



System 

TRS-80 1 


MS-80 
1 -Drive 

S395 






MS-800 

8 
1 -Drive 




MS-800 
8 

2-Drive 


MS-204 
Printer 


MPI B51 

Sgl/Dbl 
Density 

$270 


Shugart 6" 
Sgl/Dbl 
Density 

S500 


$1695* 


$2195* 


S795 


TRS-80 H 


N A 






$1095" 




$1595" 


$795 


$270 


$500 


Appie ii 


N/A 






51645' 




$2145* 


$870"* 


$270 


$500 


S-100 


S395 






$1095" 




$1595" 


$795 


S270 


$500 


■ includes ">a'Owate 
'• memoes "cxowore 
■" includes parallel m 


sc"ware ana oocumenta'ion ;CaD>es F 
W<a locurr.entatior (Caoes F»Tra S3<5 3 
forface with docun-ien'ot'Cm 


HO 33vOJ 









For your convenience, order Matchless products from these Distributors/Dealers: 


ARIZONA 


CALIFORNIA 


INDIANA 


Gold Mind Systems 


Hobby World 


Brookville Electronics 


2810 So 24th St. 


1951 1 Business Center Dr. 


571 Main Street 


Phoenix. Ariz 85034 


Northridge. Ca 91324 


Brookville. Ind 


(602)273-7732 


In Cal. 1-800-382-3651 
OutotCal 1-800-423-5387 

Jade Computer 


(317)647-5005 


MARYLAND 


1 3440 Hawthorne Blvd 


NEW JERSEY 


Radio Shack 


Lawnaale. Ca 90250 


Mountain Electronics 


Forrest Plaza Shopping Center 


(213) 973-7330 


8 Mam Street 


Annapolis. Maryland 21401 




Sparta. N.J 07871 


(301)224-2900 


Q T Computer Systems. Inc. 

15335 S Hawthorne Blvd 

Lawndale. Ca 90250 

(213) 970-0952 

1-800-421-5150 


(201) 729-5719 




ATCHLESS 



The More-Quality-Per-Dollar People 

Dealer inquiries Welcome • TRS-80 is a Radio Shack product 



*-16 



YSTEMS 



1 8444 South Broadway Gardena. CA 90248 
(213)327-1010 



1<J80 Matchless Systems & Morket Plan 
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GENERAL 



Adventures 
In Roseland 




Allan S. Joffe W3KBM 
1005 Twining Road 
Dresher, PA 19025 
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This general equation J = a 
SIN X, If properly translated 
into a program that your TRS-80 
can digest, paints a three leafed 
rose onto your monitor screen. 
Program Listing 1 gives a pro- 
gramming possibility. After you 
have run the program and ex- 
amined the scenery, the ques- 
tion "Why bother?" may come 
up. 

Pattern After Pattern 

For a partial answer, make 
the following changes and addi- 
tions to Listing 1. 



5 G=0 
15 G = G + 1:PRINT[a)50.G 

30 H = 35.SIN(G.J) 
80 INPUT ZS 
90 GOTO 10 



You now have a program that 
produces pattern after pattern, 
because of the changing value 
of G, each time the program 
runs. Line 80 is merely a way to 
put in a controlled pause. 

When one pattern has been 
generated, you may examine it 
for as long as you wish, hitting 
ENTER to get the next one. 

The print statement in line 15 
is an index that will help you 
make a record of any pattern 



that happens to strike your fan- 
cy. 

Running the revised listing, 
you will see that when G is an 
even number, the rose has pet- 
als equal to 2-G, and when G is 
odd, the petal count equals G. 
Note also that when G is odd, 
the figure Is first traced and then 
retraced by the program. 

If you are going to run any 
number of these patterns, I sug- 
gest you alter the STEP in line 20 
to read .035. This cuts the print 
time in half without too much 
damage to the Image. 

After you have played with the 
program for a bit, jump past the 
rose petal section by changing 
line 5 to read G =29. Remember 
that as the patterns form, you 
can stop them as desired using 
SHIFT [A]. 

You will notice that some of 
the patterns are predominantly 
circular, while others are spirals. 
Some are cluttered looking and 
others quite sharply defined. 

You can expand them by set- 
ting the value in line 5 to such 
constants as 99, 199 or 299 to 
find new patterns. For more 
visual fun with your TRS-80, set 



10CLS 

20 FOR J = TO 6.28 STEP .0175 

30R = 35-SIN(3.J) 

40X = (R.COS(J)r64 

50Y = (R.SIN(J)r»47 

60 SET(X,47f(YO)) 

70 NEXT J 



Program Listing 1. 



unPRINTROLur. 



for the TRS-80 1 LINE PRINTER - 1 

> FIVE SELECTABLE PRINT DENSITIES 

On* variable, (rom 10/in to 22/in (approximate) 
Four constant, usor adjustable 

> TWO WIRES TO PRINTER CIRCUIT BOARD 



KIT - $59 

chock or money order 



♦ 



ASSEMBLED -$89 

Pa residents, add 6% 



THE HARDWARE COMPANY ^248 
5601 PENN AVE A23 
PITTSBURGH, PA 15206 

TRS-80* registered trademark ot the Tandy Corp. 



• TllSESiS • 

>(liSfc#fIll](|Turn your Editor 
Assembler into a disk package. This 
patch modifies 
under TRSDOS, 
Features? Add 
move, global 

pagination with 
sorted symbol 



1.2 

or VTOS I 

I/O, block 

printer 

prompting. 



EDTASM 1 
NEUDOS , 
full disk 
change , 
optional 
table, print memory 
utilization, correct DEFM expansion, 
protect memory, and recover after 
BOOT. From within the EDTASM you 
will have DIR, KILL, t FREE. This 
package is a must for assembler 
programmers 1 Priced at $20. 

DISK* mod and DSMBLR II require a 32K 
disk system. 



>dsmhlr II 

assembly lanquaqi 



Complement your 

ily language tools with this 
Z80 disassembler which produces 
screen, printer, or disk file 
output. A 2-pass process provides 
SYMBOLS for 16-bit address and 8-bit 
relative references. EQUates k ORG 
are generated. Priced at $20. A 16K 
Tape Version (DSMBLR 1.2) is 

available for $15. 

#3 III \M I 1 1 El tJOW Y ou can append 
I or un CMD files and/or SYSTEM 
tapes. Perform transfer to & from 
disk/tape of SYSTEM/CMD modules with 
offset capabilities. Provides PATCH, 
TAPEDISK, & LMOFFSET capabilities as 
well as adds a few of its own. Get 
CMDFILE today 1 16K req'd. $20. 
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MISOSYS Department K 

5904 Edgehill Drive 

Alexandria, Va. 22303 

703-960-2998 

MASTER CHARGE t VISA Accepted 

A Sophisticated Model II Editor 
Assembler is now available. Contact 
MISOSYS or Galactic Software ltd. 



Disk Based 
Word 

Processor 
$7.50 



A complete word processing system 
for your TRS-60 Including full editing 
feetures such as paragraph move, line 
deletion, Insertion 4 1 1 na correction. 
Store text on disk, print business 
and personal letters, reports with 
numbered pages and title pages.' Text 
stored on disk as blocks are created 
so texts are not limited by the aval I- 
able memory. The PENSA-WRITE word pro- 
cessor Is for 16K single-drive TRS-eOs 
and c omas complete with software to 
produce upper/ lower case at prlnthead, 
and keyboard reverse. Full right/left 
Justification and much mora. Send 
cheque, money order or order by phone, 
24 hours, 7 days a week. Mastercharge 
and Visa welcome. Manual only, 11.75- 
deductlble from cost of software. 

ORDER NOW! ! 



MMmit 



COMK/7FJ SfffWCfS 

4441 WEST FIRST AVE. 
VANCOUVER, B.C., V6R4H9 

604-224-3107 
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THE MICRO CLINIC 



SYSTEM DIAGNOSTICS FOR THE MODEL I TRS-80* 

MEMORY DIAGNOSTIC 

• Write /Read section tests each 
address 2560 times 



• Verifies correct refresh operation 
and address uniqueness 

• "M1 Worm" test executes machine 

code from each address. 



THE FLOPPY DOCTOR 

• Completely tests 35 or 40 track 
drives 

• Tests controller functions and 
status bits 

• Tests drive motor speed and allows 
adjustment 

• Complete error logging for 1 to 4 
drives 

Both diagnostics are written in Z-80 machine code and can be run continuously 
to verify long-term system reliability. Complete instruction manual includes 
hints to troubleshooting. Supplied on diskette for a minimum 16K single disk 

System. 'TRS40ISA REGISTERED TRADEMARK OF TANDY CORPORATION 

PRICE: $19.95 CA residents add 6% Sales Tax. Add $1.00 PIH *> 214 

-.THE MICRO CLINIC* 17375 Brookhurst • No. 114 'Fountain Valley CA 92708 — 



tit 



mtf 1 



fiifc 
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fctwm i ncTtttE lam 

Includes machine lan- 
guage subroutines which 
allow easy creation ot 
animations. Images larger 
than the screen, etc. 

• Images can be saved on 
cassette for use in other 
programs. 

• Easily accessed from 
BASIC or assembler. 

• Full wrap-around 
protected. 

• Can be used for alpha- 
numerics. 

• Includes EDTASM 
source, system/object 
code, BASIC Demo, and 
5 demo animations on 
cassette. 

• 16 page manual 

• For Lil 16K. 
$12.00ppd 



^F WWI 



FRANK LUKE 

Is a simulation based en the 
exploits of American Ace 
Frank Luke, Jr. Hunt for ob- 
servation balloons behind the 
front. If you survive, you get 
a trip to Parts (creeled by 
PCTWDO). For Lll UK. 
SlO.OOppd 



C lightpenlf^^p 

* keyboard "-*"^ 

Ml joystick CMMCUM 

sensor •*», 
you name it 



around tor putting your com- 
puter In contact with the world 
around it without tying up the 
cassette port or modirvlrwiTRs 
computer . Plugs Into expansion 
card edge at back ol keyboard. 
Full documentation, Instruc- 
tions, J2J1M for joysticks .... 
Powered by inexpensive AC 
adapter available from Radio 
Shack and elsewhere. 
Kit $35.00 

Assembled a tested $45.00pfHl 



Order PCTWDO. FRANK LUKE, 
&UI08p*lrom 2 

\niversal 



NTERFACE 



P.O. BOX 1077 
GLENDALE HEIGHTS. 



We 

VISA4MC <L 60137 

(312)469 6921 
IL residents add S'« % t« 
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the value of G in line 5 to 29. Line 
20 should read: 

20 FOR J =0 TO 3.14 STEP 035 

This line eliminates some of 
the clutter you may have noticed 
in the patterns and also speeds 
up the printing of the image. 

When G = 35 you see an im- 
age of five tangent circles. If 
G = 44 you have a gaggle of four 
circles. When G = 36 you see a 
stylized eagle inside a spiral 
segment. 

We already have index G as a 
guide. Add another index so you 
can see what I see in the follow- 
ing examples. 



Change line 30 to read: 

30 R=35.SIN(G«J): PBINT»0.J 

Start the program running 
again by setting G in Line 5 to 
equal 28. The first time you run 
the program G will equal 29. If 
you stop the pattern when 
J = 1.12, you should see what 
might be interpreted as a barbell 
weight. 

If G=33 and J = 1.575, you 
may see a dinosaur. 

If G= 63 and J =1.47, you will 
hopefully see Snoopy the dog. 

If G = 116 and J = 1.435, you 
will see a running dog. 

Here are some other fanta- 
sies available by altering G. 



G = 143, is a stylized Darth 
Vadar, and G = 144 gives you a 
close approximation of the hu- 
man eye as shown in a cross 
section of an anatomy book. 

Negative Values 

You can also use negative 
values for G. In this last image, 
let G=-144. The pattern is 
identical except it has been 
rotated so that it is now the mir- 
ror image of the positive G input. 

Since we are dealing with cir- 
cular functions, this displace- 
ment can be left to right as in 
this example, or top to bottom 
(G= andG= -1). 

You can also get a combina- 
tion of shifts, such as both right 



to left and top to bottom, as 
when G = 36 or G = - 36. There 
are times when altering the sym- 
metry makes the image more 
realistic. For example, if G =33 
and J = 1.115, you see what 
looks like a running horse. If you 
alter line 30 to read, 

30 R = 45.SIN(G.J) 

the running horse becomes 
more realistic. 

This program is a nice way to 
introduce some imaginative 
people to the TRS-80. It is one 
sure way to get rid of the com- 
ment, "Shucks, I can do that 
with my calculator". ■ 



.THREE OUTSTANDING PROGRAMS^ 

PARSECTOR V tmi ultimate space mm $19.95 

T««o opponent! met ill y *** powerful moth*' snip* throjaah the 
oalaiy end capture persectors. Launch fleet baltla craft: 
f tiers. cru*er*.end base* Fira htoh ppwered energy baanaj 
o> deadly short range weapon spreade To win you mual conojier 
tha galeiy or destroy your opponents mothar ahtp. 
SPECIAL FEATURES: Unique epllt acraan give* aacfi piayar a 
private video dleptey Act Ion Sound* and Graphics aiptoatona. 
■vsopon release*, launch** and mora Vinabla galaxy ana. 
Play another person or ma compular opponant at 3 *»HeuCiy level* 
LAUNCH A COMPUTE SPACE FORCE IN MINUTES • 

! ! ! ANTS ! ! ! a stimulating action game $14.95 

Two cotome* ol ant* are at war. Oppoai n a queen ant* produce 
lour types ol offspring,: worker*. io*dlor», guard*, and drone* 
The challenging strategy I* to produce ant* In tha proper sequence 
to sting the enemy queen or overrun its neat . 
SPECIAL FEATURES: Full screen action with SOCUD Hundreds" 1 
ants battle with machine language speed 3 game vanaton*. 
Play snottar person or the compukar opponant at 4 cWflcufty levels 

NAME THAT STATE QUIZ educational $14.95 



ling way to Mam (taut our SO Mas 
•napes, nam**. capitals, population*, areas, i 
Three types of queues true* la***, mump)* choice, and fill In tha 
Hank SPECIAL FEATURES- Action Sound*, rewarding lone* and 
harassment buuers. Continuous score. Easy to use 

TRS80 L2 16K required. For sound you must hook up an - 21 1 

inexpensive speaker-amp system to cassette pin. 

For a jof j a a sj cassette* instructors sand CHECK or MONET ORDER 

SYNERGISTIC SOLAR MC PO Bos 960S95 . MIAMI FL 33156 



The Playful Professor 

You know your child would rath** play oames on 
your TRS-80 than practice math . But can you blame 
him? Let's face it, 'programmed learning' packages 
can be unspeakably dull. Until now. Med Systems 
present* a way for your child to 'earn mathematics 
and play a game at the same time! 

The Playful Professor places your child in a 30- 
room mansion haunted by an intelligent ghost who 
holds the key to the only door out By correctly 
answering problems, he moves from room to room, 
first to get the magic rope before the ghost captures 
him, and then to catch the now elusive ghost. 

Options include 

• Selection of problem difficulty 

a Selection of problem type (♦. -, «. /, fractions) 

• 1 or 2 player game 

a Playing by dice roll* for rusty adults 
("Password protectable by parent) 



"TRS-80 Is a registered trademark ol TANDY CORP." 

Med Systems Software 

^,2 8 PO Box 2674. Chapel Hill, N C 27514 



&t 



ATTENTION INVESTORS! 

COMMODITY AND STOCK 

MARKET ANALYSIS 

SOFTWARE 



THE ANALYST 

Calculates Wilder Indicators lor DMI. RSI, 
Parabolic /Time Price Systems **** 

Eliminates tedious calculations. #49* 



THE OSCILLATOR 

Filters historical data and locates 

profitable oscillators. Provides market 

entry/exit points. 

Has simulator mode. 



$49. 



FOR LEVEL II 16K OR 32K DISK 

4 User oriented rust load program and go 

j Market tested 

i Use commercial data files or make your own 

4 Graphic capabilities 

j Printer options 

j Clear and complete documentation 

i Monitor numerous markets in just minutes per day 

MANAGEMENT SERVICES 

290 1 CLENDENEN LANE ^ 21 3 

LONG VIEW. TX 75601 

TtX MS ADO 3* SAKS TAX 



FOR 14 HOUR /MFORMAflOM 

mOMf «M-«M-ll*S 




HOMES 

Sor 
TRS-80 



Custom furnitur* for tha 
TRS-80 off ice or horn* decor. 



Featuring 

• "a" Qvol<>r. G itSSSSP st end Economy fctodsh 

• ConvxMr CoraelM lo- J '29 95 Pr.nier Standi f SJ 95 

• Cornell !• TtS-SStminaii Syilem . buill in 



/vs 



*^146 



AUDIO -VIDEO !*•» *> 
SVBTIMS *M 

Of it- inewes tfiviied 




Theee popular, profeeaionally developed 
applications are low-priced. Guaranteed 
performance! Detailed booklet Included. 

• BUDGET S, INVESTMENT 117.95 

• BUDGET St CHECKING IU..95 

• HOME INFO RETRIEVAL It 1.95 

• MATH (agee 5 *-nd up) f 7.95 

• STOCK PORTFOLIO 118.95 

• AUTOMOBILE » 12.95 

• MASTERMIND sane » 10.95 

• MONTE CARLO £•■* I 7.95 
■ and others from I 4.95 

Send order, or 11.00 for descriptive 
catalogue (free with order) to: ^116 

NfWIY SOFTWARE DEVELOPMENT CO. 
Zee DAWLISH AVE TORONTO. CANADA M4N IJS 



For Canadian5 
* Owners!^ 

Lower Case Modification .. $65.00 
Cassette Load Modification ■ $20.00 
Radio Shack Numeric Keyboard 

Installation $50.00 

(You supply numeric pad) 

RS232C Serial 1/0 Port for Printer 
etc. (Complete with connectors) 
For Use With or Without Expansion 
Box $169.05 

For a complete catalog and credit 
vouchers worth $25.00 on future 
purchases send $5.00 to: 

r*i< 



ORTHON saSHF 



►^108 



12411 Stony Plain Rd., 
Edmonton, Alta. T5N 3N3 
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GENERAL 



Is your random really random? 
Try this Level I program to plot a bar graph. 

Randomness 



Todd L. Carpenter 
6660 Washington 
St Louis, MO 63130 



t the heart of most game 
^programs is a statement of 



chance, the RANDOM state- 
ment. Having the ability to look 
at the shape of the RANDOM 
distribution, can give you the 
power of shaping the distribu- 
tion to suit your purposes. 

Graphics displays on the 
TRS-80 certainly have their 



limitations, but there is one type 
of display the TRS-80 handles 
rather nicely— the bar graph. If 
you are interested in the state- 
ment Y = RND(X), it is important 
for you to understand the dis- 
tribution characteristics of Y 
over its range (1 to X). A bar 



graph can display this with a 
touch of elegance. 

Is RANDOM Really Random 

I had written a custom Star 
Trek program (hasn't everyone?) 
for my Level I, 16K machine. 
After playing with it for several 



Program 


Listing. 




100 REM ** RANDOM DISTRIBUTION GRAPHICS PROGRAM ** 






110 REM ** •* 


870 NEXT I 




120 REM *• TODD 1. CARPENTER ** 


880 : 




130 REM *• 10/01/79 ** 


890 : 




140 REM ** «* 


1000 REM ** PLOT X-AXIS ** 




150 : 


1010 CLS 




300 CLS 


1020 J-INT(K/32)+l 




310 P.: P. "INPUT X FOR THE RND(X) STATEME 


1030 FOR 1-16 TO 123 




NT. IT" 


1040 SET (1,38) 




320 P. " MUST BE A POSITIVE NUM 


1050 IF INT(I/10)=I/10 THEN SET (1,39) 




BER: " 


1060 NEXT I 




330 P.: P." <= RND(X) <= X" 


1070 : 




340 P. A. 74,""; : INPUT X 


1080 t 




400 CLS 


1100 REM ** LABEL X-AXIS ** 




410 P.: P."l OF TRIALS INPUT THE DESIRED NUMB 


1110 FOR 1=0 TO 10 




ER OF TRIALS." 


1120 P.A.905*5*I,5*I*N; 




420 P. " THE GREATER THE NUMBER 


1130 NEXT I 




OK TRIALS," 


114t : 




4 30 P. " THE SMOOTHER THE GRAPH 


1150 : 






1200 REM ** LABEL Y-AXIS •• 




440 P. A. 77,"";: INPUT C 


1210 FOR 1-0 TO 5 




450 CLS 


1220 P. A. 770-1*128, J+J*6*I; 




460 : 


1230 NEXT I 




470 : 


1240 : 




500 P. A. 348, "THINKING"; 


1250 : 




510 K-0: F-50 


1300 REM •• PLOT Y-AXIS *» 




520 FOR 1-0 TO 50 


1310 FOR 1-6 TO 38 




530 A(I)-0 


1320 IF INT((I-2)/6)-(I-2)/6 THEN SET (15,1-1) 




540 NEXT I 


1330 SET (16,1): SET (17,1) 




550 X»INT(X) 


1340 NEXT I 




560 IF X<-0 THEN 300 


1350 : 




570 : 


1360 : 




580 : 


1400 REM ** HEADING AND LABELS ** 




710 REM ** CALCULATE RND(X) VALUES ** 


1410 P. A. 29, "RANDOM DISTRIBUTION"; 




720 REM ** MAX VALUE STATEMENT ** 


1420 P.A.83,"X-";X;" ";C;"TRIALS MAX VALUE-" 


;L; 




1430 P.A.64,'1 OF TRIALS"; 




730 M-2*X 


1440 P. A. 976, "EACH BAR IS A";N;"VALUE RND(X) BIN"; 
1450 : 






760 L-M 


1460 : 




770 IF M<50 THEN M-50 


2000 REM •• PLOT GRAPH ** 




775 IF M>50 THEN M- ( INT ( (M-l )/50 ) +1 ) *50 


2010 FOR 1-0 TO 50 




780 N-M/50 


2020 IF A(I)<J THEN 2060 




790 FOR 1-1 TO C 


2030 FOR H-l TO INT(A(I)/J) 




800 REM ** RND(X) STATEMENT *• 


2040 SET (20+2*1, 38-H) 






2050 NEXT H 




810 Y-RND(X)+RND(X) 


2060 NEXT I 

2070 : 

5000 P. A. 960,""; 




839 B«INT(Y*5fl/H) 




840 IF B<0 THEN 870 


6000 INPUT I 




850 A(B)-A(B)+1 


7000 GOTO 300 




860 IF K<A(B) THEM K»A(B) 


9999 REM *• END ** 
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TING - 
TONG 

by Ray Daly 



TING-TDNG! 
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Sound effects and fast action combine in this 
old favorite to provide hours of fun for one or 
two players. This machine language version of 
ping-pong has seven levels of play to make it a 
challenge for everyone. 

Each player controls the paddles using two 
keys. Two players compete against each other 
while the single player rebounds the ball off a 
back wall. 

Acorn produces several games for the 
TRS-80*. These include: Code breaker, Star 
Warp A Lunar Lander, Word Challenge. 
Bandito, Block'em, and Ting-Tong priced at 
$9.95. Pigskin, Quad and Star Trek Two are 
available for $14.95. Ask for these and other 
quality Acorn programs at your local computer 
store. 



'TRS-80 is a trademark of Tandy Corp. 




DEALER INQUIRIES INVITO) 




#■• 



n „ 

Software Products, Inc. 



•M North Carolina A vanut.S.E, Washington, D.C 20003 



weeks, I noticed that the majori- 
ty of the Klingons were always 
located near the center of the 
galaxy. Rarely did I ever find a 
Klingon in any of the perimeter 
quadrants. I thought I had used 
a simple Y = RND(X) statement 
in distributing the Klingons; but 
it seemed that either my RAN- 
DOM statement was not truly 
random or the Klingons had suc- 
ceeded in outsmarting Captain 
Carpenter. I chose to pursue the 
former suspicion because, after 
all, the Klingons are the bad 
guys and they could not out- 
smart me— could they? 

I set out to write a simple pro- 
gram that would show me once 
and for all whether or not the 



ment over 4,000 times in distrib- 
uting the elements of the gal- 
axy. As you will see, it was Cap- 
tain Carpenter who had goofed, 
not Radio Shack. 

Random Shaping 

After a closer examination of 
my Star Trek Program I discov- 
ered that I had inadvertently 
used a combination of RAN- 
DOM statements. How could I 
test the distribution of this com- 
bination? After a few general- 
izations in my program I was 
ready to run an analysis on any 
combination of RANDOM state- 
ments that could start with 
"Y = ". I proceeded to test my 
Klingon distribution. Sure 



RANDOM DISTRIBUTION 



« iT TRAILS X=56 1886 TRAILS HAX VALi£= f* 
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Photo 1 



RANDOM statement really gave 
me a uniform random distribu- 
tion. The purpose of the pro- 
gram was to display in a single 
picture the distribution of the 
RND(X) statement. The ability to 
see the RANDOM distribution 
would enable me to determine 
immediately the actual ran- 
domness of the statement. 

I was prepared to make a 
shattering discovery that Radio 
Shack had goofed in their 
design of the RND(X) statement. 
But why had no one else discov- 
ered this biased RANDOM state- 
ment? Perhaps, I thought, the 
bias was slight, and I had dis- 
covered it only because my pro- 
gram used the RANDOM state- 



Ptiotos by Yuan Chang Lo 



enough, they were doing just 
what I had been telling them to 
do, concentrating in the middle. 
In separate parts of the pro- 
gram, I had mistakenly used 
what amounted to the sum of 
two RANDOM statements and 
gotten a dice-like distribution. 
See Fig. 1. 

As all craps players should 
know, when rolling two dice, 
more sevens turn up than twos 
or twelves. In fact, six times as 
many sevens turn up. 

The advantage of seeing any 
RANDOM distribution before 
ENTERing it, is that the shape of 
a distribution can be selected to 
fit an application. Once you 
know how to generate some 
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Pnofo 2 



simple shapes, the next steps 
seem easier. 

Program Inputs 

The program (See Program 
Listing) starts by asking for the 
value of X in the RND(X) state- 
ment. It can be any number 
greater than zero and preferably 
an integer (although the ma- 
chine will accept a decimal 
value and find the integer value 
itself). For the case of the 
simplest RANDOM statement, 
Y = RND(X), the function Y is 
uniformly distributed from 1 to 
X. This means that for a single 
trial, the probability is the same 



for getting any integer value 
from 1 to X. For example, X = 6 is 
analogous to the case of rolling 
one die. With six faces, the prob- 
ability that any particular face 
comes up is 1/6. See Fig. 2. 

Next, input the number of 
trials to be made. For our exam- 
ple this would be the number of 
rolls of the single die. 

The greater the number of 
trials performed the more the 
graph will be delineated. The 
number of trials made must be 
large compared to the entered 
value of X. As a rule of thumb I 
make the number of trials at 
least 20 times the maximum 
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Photo 3 

^ Reader Servict - see page 162 




Don't be misled by more expensive Imitations! 

This is the original Photo point light pen pre- 
ferred and supported by some of the leading 
software sources like, "Quality Software"— "In- 
stant Software"— "Level IVproducts and so on 

Just imagine . . . 

In playing backgammon, (included) when you 
want to move a man, you just point at where you 
want to move from, then point at where you 
want to move to, and your man moves!!! No 
more fumbling with keyboards — YEA! 

Your Photo Point package comes complete; 

• 1 Photo point light pen (of course) 

• Info sheets on how to connect the pen and 
how to write your own programs 

ALL IN BASIC 

• Two apertures 

• AND two sensitivity settings 

• A cassette tape with 4 informative programs 
and games 

• Ready to connect to your TRS-80 System. 
(DOS too!) 

• Does not void any Radio Shack warranties 

Requirements: 

• Level II basic 

• And a little imagination!! 

For fast real time programming it is your lowest 
cost peripheral at J19. 95 
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Announcing 




NEW PEN BASIC by Steve Bjork 

Steve is one of the Best Assembly Lang, pro- 
grammers around, and he has come up with PEN 
BASIC. This low memory routine will add 10 more com- 
mands to Level II such as PENGET which searches the 
entire screen for the pen and returns a number between 
0-1024 in about 1 sec. Plus « other commands. Perfect for 
you lightware authors and NEW light pen owners 
too! only«14. 95 



(COUPON) 

Micro Matrix ^u 

P.O. Box 938 • Pacifica. CA Q4044 
Send for yours NOW: (41 5) 355-4635 



Name 
Address 

City 

Zip 



St. 



Photopoint 
n $19.95 

Pen Basic 

n $14.95 



Card# 
Ex. 
Date _ 



Money 
CK Order Visa MC 



80 Microcomputing, June 1980 • 67 



MARK GORDON 

COMPUTERS 

DIVISION OF MARK GORDON ASSOCIATES, INC. ^ 27 ° 

15 KENWOOD ST.. CAMBRIDGE. MASSACHUSETTS 02139 
(617)242-2749 (617)4917505 



COMPUTERS 

Level-ll 4K System 529.00 

Level-ll 1 6K System 659.00 

Model-ll 64K System. . ' 3499.00 



DISK DRIVES 



40 Track 5' « inch drive 
77 Track 5' « inch drive 
4 Disk Drive Cable 



319.00 

549.00 

39.00 



PRINTERS 



Centronics 730 

Centronics 779-2 

Comprint 91 2p 

Integral Data 440C 
NEC 5510w-tractor 
Tl 810 Basic 



M1SC HARDWARE 



Expansion mt TRS 80(Ok) 
Novation Cat modem 

I6K Memory Kit 

Leeclex Monitor 

Printer Cable (or above 

ISO-2 Isolator 

AC LINE FILTER 



STORAGE MEDIA 



899.00 
999.O0 
599.00 
999.00 
2679.00 
1895.00 



249.00 
159.00 
49.00 
109.00 
49.00 
54.00 
24.00 



Verbatim-box I 0-5' * 25.00 

Memorex box IO-5'/4 22.00 

Plastic Storage Box 5.00 



OPERATING SYSTEMS 



NEWDOS by APPARAT INC . . 
NEWDOS+ by APPARAT INC 
MMS FORTH DISKETTE-PRIMER 



49.00 
99.00 
64.95 



DISKETTE TRS-80* 
BUSINESS SOFTWARE BY SBSG 

Free enhancements and upgrades to registered owners for 
the cost of media and mailing. 30 day free telephone sup- 
port. User reference on request. 
Fully Interactive Accounting Package. General Ledger. 

Accounts Payable. Accounts Receivable and Payroll. 

Report Generating 

Complete Package (requires 3 or 4 drives) $475.00 

Individual Modules (requires 2 or 3 drives) $ 1 25.00 

Inventory II: (requires 2 or 3 drives) $ 99.00 

Mailing List Name &. Address II 

(requires 2 drives) $129.00 

Intelligent Terminal System ST 80 III: $ I 50.00 

The Electric Pencil from Michael Shrayer $ 1 50.00 

File Management System S 49.00 



FINE PRINT 
TRS-80 is a Tandy Corporation trademark Use of above operating sys- 
tems may require the use ol Radio Shack TRS DOS. Radio Shack 
equipmeni subiect to the will and whim ol Radio Shack 

ORDERING INFORMATION 

We accept Visa and Mastercharge We will ship COD certified check 
or money orders only All orders must include 4 percent for shipping 
and handling Massachusetts residents add 5 percent sales tax. 

The Company cannot be liable lor pictorial or typographical inaccuraclea. 
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value that Y can be. In this case, 
make Y equal to X or 6. 

You are now ready to take a 
peek at Photo 1 which shows a 
graph of the function. 
Y = RND(50). There were 1,000 
trials, the minimum rule of 
thumb value, used to determine 
this graph. (Fifty values times 20 
trial outcomes per value, equals 
1,000 total trials.) As you can see 
it yeilds quite an uneven distrib- 
ution. 

I chose to use the number of 
trial outcomes for the vertical 
axis rather than probability in 
this case. But, either way the 
shape of the graph is the same. 

Now consider Photo 2. I ran 
the same distribution, but this 



POSSIBLE ROLLS OF TWO DICE 

time with 10.000 trials. As you 
would expect, the average num- 
ber of values per "bin" is now 10 
times what it was in the previous 
example, or 200. I have coined 
the word bin to refer to each bar 
of the graph. A bar getting larger 
can be thought of as a bin being 
filled. 

Changing the Distribution 

There are two important 
statements in the program. They 
are the RANDOM statement and 
the MAX VALUE statement. The 
RANDOM statement is at line 
810 and contains the expression 
which determines the shape of 
the distribution. This statement 
must be edited manually when- 



1 OF TRAILS 


RMQOn DISTR1UT10H 
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ever a new expression is de- 
sired. The MAX VALUE state- 
ment is at line 730, and defines 
the variable M which must be 
set equal to the largest possible 
value Y can be in the RANDOM 
statement. In the listing shown, 
Y = RND(X) + RNCXX), SO M = 
X + X. For instance, if line 
810 reads Y = X-RNCXX), line 
730 would read M = X - 1 . (When 
a term is subtracted, use its min- 
imum value.) 

Photo 3 shows the distribu- 
tion of the equation in the pro- 
gram listing. I chose to enter 
X=6, so I would be able to ex- 
tend the dice rolling analogy. 
This time I rolled two dice and 



approximated by using a large 
sum of simple RNCXX) state- 
ments. I used six terms here. 

As more and more sophisti- 
cated functions are used, a 
definite limitation crops up. A 
simple statement like 
Y = RND(X) takes about six 
times as long to execute as a 
FOR-NEXT loop pair, and the 
statement Y = RND(RND(X)) 
takes about 10 times as long. In 
other words, this program can 
take quite a long time to run 
through 30,000 trials. With that 
in mind, it's wise to start testing 
a new function with the mini- 
mum rule of thumb number of 
trials. If Y = RND(RND(X)*2), 
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Photo 5 



got a distribution such that the 
most likely number to come up, 
seven, was in the center. This is 
essentially how my Klingons 
were distributing themselves. 

Now, we move on to some 
more complicated distributions. 
Photo 4 shows a graph of the 
distribution, Y = X + RND 
(RNDMJ-RNCXRNCXX)), where 
MsX + X-1. This was run with 
30,000 trials and quite a smooth 
graph was obtained. On my 
Level 1, 16K machine, the largest 
number of passes allowable 
through a FOR-NEXT loop is 
32767, so this is the largest 
number of trials I can enter. 

Photo 5 shows a normal dis- 
tribution, for those of you in- 
terested in statistics. It can be 



M = X*2, and you enter X = 50, 
then you should enter the num- 
ber of trials as 2,000 (20 times 
M). This will not produce a very 
smooth graph, but will take only 
about 1/1 5th as much time to 
run. Usually this is about two to 
three minutes. 



Auto Scaling 

This brings up one last signifi- 
cant feature of the program. You 
have seen how the vertical axis 
scales itself depending on the 
maximum number of trial out- 
comes per bin. The same thing 
applies to the horizontal axis. 
You are not limited to a max- 
imum value of 50. It can be 51 or 
1 35 or 1 ,000 or whatever you like. 
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AT LAST1I 

A POWERFUL 

DEBUG MONITOR 

FOR THE 

EXPERT & NOVICE 

PROGRAMMERS 



DEBU6-8/8 Is a uniquely powerful monitor for (1) analyzing. (2) 
creating or modifying, and (3) debugging machine-language pro- 
grams on your level II. 16K system. 

EFFICIENT - SIMPLE - FUN 

No longer do you need to keep reaching for your reference card or 
searching through your program listing while debugging your pro- 
gram. — Most all of this information is at your fingertips with 
DEBUG-S/S. Warning - Debugging your program with DEBUG-S/S is so 
efficient and convenient that you may find yourself wishing that you 
had more bugs to find. 

RUN IN SLOW MOTION 

With DEBUG-S/S you may run your program in slow motion or single 
step and observe your Z-80* registers dynamically and/or observe 
your message printing on the screen one-character-at-a-time! 

SPLIT/SCREEN DISPLAY 

DEBUG-S/S uses a convenient split screen display system. The upper 
right section of the screen automatically displays upon entry to 
DEBUG-S/S from the user's program This section shows the user's 
next instruction in hexadecimal and disassembled symbolic form, and 
also shows the user's major Z-80* registers. The left portion of the 
screen is for the user's display or a scratch pad area for memory 
dumps The lower right section of the screen is where DEBUG-S/S 
commands are entered and echoed for the user's inputs. 

TRANSPARENT MODE 
DEBUG-S/S may be operated in a transparent mode which leaves the 
entire screen showing all of the user's display data upon entry to 
OEBUG-S/S. except for the letter displayed on the upper right corner 
of the screen indicating that DEBUG-S/S has been entered. If the user 
now wishes to examine his Z-80* registers, he simply types D (Display). 

"NO CRASH" BREAKPOINTS 

DEBUG-S/S uses a single byte breakpoint which means you may put a 
breakpoint in the first byte of any instruction in your program and not 
cause your program to crash because of the breakpoint insertion. Your 
breakpoint will stay active until you reset it or redefine it. This allows 
you to run through loops in your program repeatedly without having to 
redefine your breakpoint each time You may enter any number of one 
byte pseudo breakpoints simultaneously in your program manually 
with the Memory command 

POWERFUL COMMANDS 
Examples of DEBUG-S/S commands are: Jump - Go - Breakpoint - 
Memory examine/modify - Hex Dump - ASCII Dump - Symbolic Instruc- 
tion Dump - Single Step - Automatic Step start/stop - Increase/ 
Decrease Auto Step rate - Clear Screen and save cursor position - Clear 
Screen and home cursor position, plus other commands. 

YOU WILL RECEIVE 
You will receive a cassette and instruction manual. OEBUG-S/S is 
assembled into lower memory on one side of the cassette and into the 
top of 16K memory on the other side. DEBUG-S/S uses 4K of RAM. 
'TRS-60 is a trademark ot the Tandy Corporation. '2-80 is a trademark of Zilog 

Send check or money order payable to: 

CALSOFT 

4421 Gilbert St. #303 
Oakland. CA 94611 

California Residents add 6.5% Sales Tax. 
(PRINT) 

NAME 



$3995 



ADDRESS. 
CITY 



STATE 



.ZIP 
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PROBABILITY 



If the graph shape is all that is 
desired, this can generally be 
accomplished with 50 as a maxi- 
mum value. 

If you decide that some larger 
number is more convenient, 
then the axis will be automati- 
cally scaled. There will never be 
more than 50 bins in which to ac- 
cumulate trial points, but if the 
maximum value is 64, for exam- 
ple, the axis will be scaled down 



POSSIBLE ROLLS OF ONE (ME 



by a factor of two. This makes 
each bin a two-value, rather than 
single-value bin. 

Now you have an elegantly 
simple program that lets you 
see what the RANDOM state- 
ment can do. Thanks to this pro- 
gram, my Klingons have been 
controlled, the galaxy has been 
saved, and Starfleet Command 
will not have to give me a desk 
job.B 



I! 



DATA ENTRY 
SOLUTIONS 



!! 



- - - IN FOUR SIMPLE STEPS - - - 

[ 1 1 Draw the Data Entry Form on the VIDEO 

SCREEN 
12] Specify Checking tot Each Field 

Options 
•Length Check »Y N Check 

• Numeric Type Check »No Field Checking 

•Alpha Type Check 

|3| Store Data Entry Control Form on Diskette 
14 1 Use DATAENTR Subroutines in 

Application to COMPLETELY Control 

all Data Entry 

* BUSINESS APPLICATION ADVANTAGES * 

Standard Automatic Operator Error Prompts 
■ Simplitied Operator Training 

- Reduced Program Development Time 

- Eliminate Garbage In Garbage Out Problems 

DISTRIBUTED ON DISKETTE - - - INCLUDES: 

• Screen Prep Utility • DATAENTR Subroutines 

• Sample DE Screen 'Example Program 

•Complete Documentation 



DE 200 MODEL I 
DE 200 MODEL II 



REQUIRES 32K * 1 DISK 
REQUIRES 64K ♦ 1 DISK 



$40.00 
$40.00 



TRS-80 - SOFTWARE FROM: 

Johnson Associates -or- 24 Hour Order Line 
P.O. Box 1 402 M For Bank Card Sales 

Redding. CA 96099 (916)221-0740 

WRITE FOR FREE CATALOG 

TRS-80" >S a registered trademarH ot Tandy Corp 



^293 



G 



RONDURE COMPANY -K 



,-»i«' 



214 6304621 



the computer room 



SPECIAL 

Printer for your 
Microcomputer 




GETERMINET 
300 PRINTER 

Pin feed— 9" paper 



• 90 CtTI p04itiOT» 

• f*eee>«e antf 

• cod* 

• "1S-233 m»'l*c« 

• JOCPS 

• uopa» * k>*«'e*»# 

• ,..,-!-• 

Sriipptng containers 115.00 

(UMd| 

(good working condition, 



Will run on serial RS232 port of 
most micros including TRS-80. 



$450.00 




ASCII Keyboard 

(ussd) 
with enclosure 



SALE $15.00 



WE HAVE FLAT PACK 



ACOUSTIC 






Modem 
pickup 



$19 



50 



USED FANS 




Mufltn-8.00 
Sprite- 4 00 




NEW 

POWER 

SUPPLY 

$25.00 

iV at J An IB 
12V at 6 Amp 
12V al 3 Amp 



MICRO SWITCH KEYBOARD 

USED BUT LOOKS VLKY NIO 

■MBjHajHPJPMaVB 

t 




ASCII 



$40.00 

(Wilt' Print) 



ORDERING INFORMATION! 

We snip tna tarn* day ai rtGSivt a certified check or money order. 
Texas res dents add !»% mi«i taa. Please call II you nave a question. 
Write lor our CATALOG ol many parts, terminals, printers, etc. 
A I tail subject to availability. Your money returned if v»« are 

(MJt II' till! « . 




USED 

POWER 

SUPPLY 

$15.00 

5V at 1? Amp 
If. w <t 6 Amp 
•V Jt 2 Amp 



USED 
OMNITEK 

. , ,, 



SHlPPlNQ INFORMATION: 

Modems. »2.i0 eacb. Key Boards »3 50, Power Supply $5,00. 

Large Items t, Paris, speuly i-mlyM or Air Freight Collect. 

I Or*. ?n Orders Atld appropriate freight or postal. 

W« now UKe Master Criaroe and Visa orders. Specify lull number 

bank number and expiration date. 
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/^PROGRAM STORE 



(202) 337-4691 



4 200 Wisconsin AveNW PQBox9609 Washington DC. 20016 



Oabome& 

Associates 

Accounting 

Programs 

for 

TRS-80 

For two years we have looked for 
good business accounting programs. 
After reviewing many over-priced or 
non- functioning packages, we have 
finally found some excellent 
software. And it is available at a 
reasonable price - $25.00 per 
package. 

These programs are the Osborne t 
Associates systems, originally 
designed for the $30,000 Wang 
computer. Several C.P.A.'s at Pull 
Service Accounting and Processing 
have made a few minor modifications 
to the programs. Now, the 48k 
Model 1 TRS-80 with two disk drives 
is a business computer 1 

These programs are not games . 
They are meant to adapt to your 
accounting system. You should not 
expect us or this software to be 



your accountant, 
used, you will 
valuable business time. 
All Osborne fc 



But, if properly 
save hours of 



Associates 



programs are fully-documented by 
their three extensive books 
"General Ledger," "Accounts Payable 
i Accounts Receivalbe," and 
"Payroll with Cost Accounting." 
(These TRS-80 programs do not 
include the cost accounting 
system.) These books are available 
for $20 each. Please include $3.00 
per book for first class shipping 
(otherwise sent book rate) . 

Act today 1 These are special 
programs at a special price. 

General Ledger -$25.00 

Accounts Receivable -$25.00 

Accounts Payable -$25.00 

Payroll -$25.00 

Any book -$20.00 



Ting-Tong 

by Ray^Daly fronr/ 



Acorn 
Ping-pong for the TRS-80. The gairu 
is for one or two players with 
eight speeds and includes sound 
effects. In machine language. 
Only 4k needed. $9.95. 



TING-TDNG! 



lll'WSH 

nra» 



i jiio skiio /> roswi UN. II 
1'inoi sow "«iii i*. 



Graphic Map 
Adventure 

from Computer Simulations 

These may not be a true 
"adventure" since they use maps, 
combat screens and merchant charts, 
but they are beyond words. 

1 . Dark Kingdom has four maps 
where your goal is to defeat the 
roving monsters, collect gold and 
silver plus enough fame to combat 
the evil lord in real life. 

2. Lunar Encounter pits you as the 
protector of the moon colony 
against the alien force and their 
leader. 

3. Jedi Knight requires you to 
seek fame and fortune starting as a 
lowly knight in the last days of 
the Republic. Struggle with the 
Lord Vader with your light saber. 

4. Mercenary Commander has you as 
a soldier of Maximillian, the 
Mexican King. Try to keep the 
villages under French rule and put 
down the rebellion. 

$14.95 each. 

Mature +9 



from Adventure 



Scott 
ninth 



Adams has 
adventure. 



by Scott Adams 
International 

At long last 
released his 
$14.95 

Galactic Revolution 

by Doug Carls ton 

This is the third in the trilogy 
which started with "Galactic 
Empire" and then "Galactic Trader." 
In the time of revolution you must 
use diplomacy to make alliances, 
implement social change and fight 
the bureaucracy if you want to 
conquer the galaxy. 

Sound effects and graphics 
including bar graphs, tables, 
charts and other displays make this 
a great game for one to three 
players. $14.95 
Galactic Empire $14.95 
Galactic Trader $14.95 



Astro-Word Search 

from Program Design, Inc. 

Look for words imbedded 
horizontally, vertically or 
diagonally in the puzzles. Words 
may be backwards or forwards. Three 
puzzles per tape & three different 
tapes are available: 

SPANISH $14.95 FRENCH $14.95 
GEOGRAPHY $14.95 



Typing Tutor 



Ainsworth 



Baker 



from 



'osoft 
efore this program, we were 
reiucant to advertise any other 
typing program. But this one was 
worth the wait. 

The program adjusts to your 
skill level. There are two 
sections. In the Tutor section you 
learn new keys. The program 
continuously adjusts to help you 
learn those you don't know and adds 
new ones as you progress. The 
Practice Paragraph section gives 
you an accuracy and words per 
minute rate. It tells you which 
keys were missed and where you were 
slow. 

One of the most practical 
programs for the TRS-80. $14.95 



Editor/ Assembler PLUS 

by Chamber 1 in and Yates from Microsoft 

The "PLUS" in assembly language 
programming has arrived. If you have 
reached the limits of editor/assembler 
or were always a little awed by 
assembly, then Microsoft's version is 
for you. You not only get the features 
found in their Radio Shack version, but 
also included are the debugging features 
of TBUG and more. This will make your 
programming, editing and debugging 
easier, more efficient and more 
enjoyable. 

The 80 page reference manual describes 
all the features. These include the 
macro facility, assembly directly into 
memory, conditional assembly, the 
additional expression evaluators, 
automatic origin, alphabetic symbol 
table and the quash command. Additional 
editor commands and the new debugger are 
also fully explained. 

For 16k tape system $29.95 

Electra Draw 

from The Programmers Guild 

This disk-based, graphic generating 
program produces lines of BASIC code for 
you to merge into any program. It 
produces low speed, full screen 
displays. It adds a nice touch to any 
program. $19.95 



from Mmnfora jirero 



lumrora Micro Systems 
Organize your disk program library. 
This program reads multiple disk 
directories to produce an index of disk 
files. You can sort, search, delete, 
add, or print the index of filenames. 
You can also save it to disk. "The best 
thing since sliced bread" said 
80-Microcomputing. Requires 32k and one 
disk drive. $19.95 



Structured 
BASIC Translator 

by Gene Bellinger from Acorn 
Try structured programming. You can 
write programs using PROCEDURES, CALLS, 
CASE-CALLS, IF-THEN-ELSE, WHILE and 
UNTIL. Once written, SBT will quickly 
translate the structured code into an 
efficient BASIC program. Speeds up 
program development and documentation. 
The program is both fast (a 20k BASIC 
program in less than 4 minutes) and 
compact. Requires 32k and one disk 
drive. Supplied on disk for $29.95. 



Credit card callers may phone 
24-hours A DAY AT (202) 337-1691. 



us 



aoooDDaaoooaQOODoannDoaauaooaooDODDOaaaQ 
THE PROGRAM STORE 
4200 Wisconsin Ave NW 
PO Box 9609 Dept K 1 
Washington, D.C. 20016 



fa 



D 



plane Bend me these TRS-80 program: 



title 



price 



postage: $ 1.00 
total: 



address: 

city, state 

& cod e 

O check payable to The Program Store 



O MAS1T30ARGE mc bank code: 
DVISA exp date: 

card number: 

signature: 



'Reader Service -see page 162 
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GENERAL 



Forget pen and paper, use your 80 for doodling— 
interesting results can be saved on cassette or disk. 



Doodle Bug 



R. Daniel Bishop 
Department of Chemistry 
The School of the Ozarks 
Point Lookout MO 65726 



Some people are habitual 
doodlers. Give them a pen 
or pencil and, without being 
aware of their actions, they be- 
gin sketching or scribbling on 
anything that might be handy. 
Their addiction seems to be 
uncontrollable in certain loca- 
tions, such as near telephones, 
and at specific times, such as 
during long business meetings 
or conferences. Some even doo- 
dle on napkins in restaurants! I 
know these things because I, 
too, am a compulsive doodler. 
Long ago I gave up all hope of 
ever reforming myself. 

It thus should come as no sur- 
prise that one of the programs I 
just had to complete for my 
TRS-80 was Doodle, a program 
designed to promote uninhib- 
ited doodling using the graphics 
capability of the microcom- 
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Fig. 1. Eight direction keys used 
to control development of the 
sketch via keyboard input. 



puter. Furthermore, in the event 
that a productive sketch were to 
take birth during the doodle pro- 
cess, I derived two subroutines 
to permit saving the video dis- 
play, either on disk or on cas- 
sette tape, and two correspond- 
ing subroutines to permit re- 
calling the stored data and re- 
cast the video display in its en- 
tirety. Thus, a building floor 
plan, a circuit diagram or styl- 
ized drawings of equipment or 
building architecture can be 
stored for future redesign or 
viewing. 

Once a design has been com- 
pleted and stored, some simple 
program statements that 
employ the PRINT @ XXX, 
feature can be written temporar- 
ily into the redisplay subroutine. 
Then, when this subroutine is 
run, not only does the original 
sketch reappear on the screen, 
but also the alphanumeric infor- 
mation shows up. This new dis- 
play can then be saved using the 
save subroutine, thus allowing 
complex graphics displays with 
accompanying labels and cap- 
tions to be stored. 

The Program 

Two sets of keys are used to 
provide direct keyboard control 
of the sketch and of the pro- 
gram. Fig. 1 shows the eight 
direction keys that are used for 
directing the movement of the 
graphics display points. With 
your middle finger on the G key, 
it is then quite natural for you to 
tap the T for upward movement, 
the H for movement to the right, 
the C for diagonal movement to 



P Pause. Halts the program 
until a new keyboard entry 
is made. 

S SAVE video sketch on 
disk. 

Z CSAVE video sketch on 
cassette. 

G Move cursor without leav- 
ing permanent display. 

L Erase current cursor posi- 
tion and proceed to next 
position (as determined 
by last direction key 
pressed). 

Table 1. Five program control 
keys used to provide pro- 
gram control from the 
keyboard without interrupt- 
ing the video display. 



the lower left, etc. 

The program was initially de- 
signed to produce only one 
point each time a key was 
tapped. I soon decided to let the 
computer handle any repetitive 
functions, so that now each of 
the eight direction keys initiates 
a line drawn in the direction 
chosen. Tapping any of the 
other direction keys once re- 
directs the line. 

In addition to the eight direc- 
tion keys, five control keys were 
chosen to allow program control 
to be initiated from the key- 
board. These five control keys 
are listed in Table 1. Pressing 



the P causes the program to 
pause, thus halting the move- 
ment of the display point and 
stopping the line being gener- 
ated by it. 

The S and Z keys function on- 
ly when the program is in the 
pause mode. Thus the P key 
must first be pressed, followed 
by either S or Z. The S directs the 
program to the save subroutine, 
which saves the video display 
on disk. Similarly, the Z key 
directs the program to the save 
subroutine, which saves the 
video display on cassette. To 
avoid a possible mix-up between 
these two, which would result in 
an error message and destruc- 
tion of the sketch on display, it 
is advisable to incorporate only 
one of these options into your 
program, depending on the par- 
ticular storage method you wish 
to use. 

The G and L keys function on- 
ly after a direction key has been 
depressed. The G key will cause 
the pointer to move in the direc- 
tion determined by the last 
direction key to be pressed, but 
it will not leave a permanent dis- 
play of the points. This allows 
for moving the cursor to any part 
of the screen without leaving a 
trace of its passage. Several 
unconnected figures can be 
sketched using the G key to 
move the cursor from one figure 
to the next. 

The L key is used to erase 
points that have previously been 
set. Erasing is accomplished as 
follows: 

1. Use an appropriate direction 
key and the G control key to 
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"A trademark of tha Tandy Corporation 




Preserve — Protect — Display 

your equipment with 

CRYSTAL CLEAR 
PL\STIC COVERS 

Special offer Buy both covers & save 



• Keyboard. Interface ft. CRT 

• Lin* Prime* I 



» I 2 95 M 

ft 12. 99- e« 



af ion price $2 1.95 "1 
$1 50 postage J 



Combination 
L Phis 

(Indiana residents add 4' sales tax) 



Crown Plastic Co. s 119 

3746 N. College 317-925-5566 
Indianapolis. IN 46225 




SPECIAL 



TRS-80* -I Or HI 

MEMORY EXPANSION 

CHIPSET: $69!! 

we've done It again ... 8 low power, 250 
n$ 16K dynamic RAMs at a trend-setting 
price. Expands memory in Tts-80*, Apple, 
Heath H89, Exldy Sorcerer, newer pets, 
etc. Don't be Impressed with fancy packag- 
ing or four color ads, our chip set gives all 
the performance you want at a price you 
can afford. Offer good while supplies last. 
Add S3 for TRS-80* compatible dip shunts 
and complete installation instructions. 

• T*s«o » a traoemar* or tnt Tandy Corporator* 



C#< '•» add '*• Alio* **• "Map laa, «>c«ss '•tuorjao 
visa* Maata-cnarga* can our 24 «• ede a«s- at 
(4151 Hi«!l COO OK <ntn street toam for UPS 
Pncei wOMCt to cnaoo* wxnout notice 



WE ALSO MANUFACTURE AN EXTENSIVE 

LINE OF S-100 PRODUCTS; SEE C OMP UPR O 

S-100 BOARDS IN PERSON AT FINER 

COMPUTER STORES WORLD-WIDE. 

CompuPro 



»*75 



from 



mm 



Bide TO. Oakland Airport CA 94614 
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A year ago, when nobody had ever 
heard of me, I said these disks could turn 
a TRS-80* into a serious computer. 

Now they tell me I'm "the standard 
of the industry." 

I'm Irwin Taranto. and times have changed And the Model II programs 

In the first twelve months, almost a thou- Some brand new. highly- sophisticated 

sand businesses put me to the test programs (or the TRS-80 Model II. at $24995 

You can buy my TRS-80 systems all over the each, plus S20 for the book where required 
country — dozens of companies sell them. Some General Ledger /Cash Journal 
are my dealers, some aren't. And this creates Accounts Payable/Purchase Order 

a new set of problems. Accounts Receivable /Invoicing 

You see, learning to use a computer — any Payroll/Job Costing 

computer — is like learning anything else. It 

takes some getting used to. If you sit down For the Model I programs, you can tell us 

with a computer program and the manual and what you need in a letter or by phone. You get 

try to figure it out all by yourself, you'll prob- the disk and all the instructions you need. Any 

ably just give up and feel you've been had. problems, just call me. 

You have to hang in there for a month. For the Model II programs, I ask you to fill 

make a few phone calls, and have somebody out a questionnaire before I send you any 

who really understands the system help you materials. The systems have so much flexibil- 

work it out. ity we tailor them to your needs. 

That's why I still answer the phone. And That way. I make sure you get a system that 

why. I guess, people say all those nice things works. If you have any doubts about that. I'll 

TK-» M n ^«i i .„.t„m. <*"*• y° u the MIMS of some P«ople in your "»« 

i ne mmwi l ayer-em* .._,,. who've already been through the process 

So far. I have six systems for the Model I. at ^ h9m lM wheth#I • reaJ i y deserve 

S99.95 eaeh. plus S20 each for the books where OM f new reputatlon 

required. For the Cash Journal option on the 
General Ledger, add another $50. 

Accounts Payable 'TSmsaMM. ae Rii i. 

Accounts Receivable ^ 45 J, fUOlllU 

Invoicing & ASSOCIATES. INC 

General Ledger (Cash Journal optional) pQ ^ ^ 4136 9admtai Hignw . y „„ p^, CA 94903 

Payroll (415) 472-2760 Add S3.60 par order for handling 6% sales 

Inventory Control tea in California only. Maatar Charge, Viaa. COD. 

TRS-80' DISK FILE MESS? ~ _ " 

Find disk files instantly with the most sophisticated disk indexing program available 
Similar Indexing programs exist but none with as many features as FIND1SK-1I! 

AUTOMATICALLY create, sort, pnnt, search a Master Index of all disk files 
AUTOMATICALLY read file names, disk numbers (no hand entry) 
AUTOMATICALLY print disk labels (optional). 
AUTOMATICALLY update Index from revised disks 
AUTOMATICALLY add optional file descriptions 
AUTOMATICALLY purge disks of unwanted files 

• FINDISK-II (on tape or disk. 32K mm) $20.00 

Other powerful programs from Documan available on tape or disk: 

• STRUCT-I beam design and moment transfer w graphics (16K) $15. IX) 

• SOLAR-I essential calculations for passive solar design (32K) $30. (X) 

• RIA-I complex analysis of real estate investments (32K) $30. (X) 

• DEPRECIATE! cdiculdtt- print 12 facts on depreciable items (16K) $10. (X) 

^u VISA OR MASTER CHARGE 

DOCUMAN SOFTWARfc BOX 387-A KALAMAZOO. Ml 49005 (bib) 144-0605 
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THE 

GREEN 

SCREEN 
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If you spend more than a few minutes 
with your TRS-80* you will welcome this 
inexpensive accessory. 

• ••••• 

First we made it for ourselves. Since we 
spend many hours with our four 
systems, we were looking for a way to 
get a better display, more like the green 
phosphor of our big brothers. We found 
that a certain optical band-pass filter 
gave excellent results. We were so 
pleased with it that we decided to make 
it available to others. 

****** 

The GREEN SCREEN will: 

• IMPROVE IMAGE CONTRAST 
e REDUCE EYE FATIGUE 

e DECREASE GLARE 

• ENHANCE SCREEN LEGIBILITY 

• PROVIDE A MORE PLEASING 
DISPLAY 

• GIVE A DISTINCTIVE PROFESSIONAL 
LOOK TO YOUR SYSTEM 

The GREEN SCREEN is custom molded to 
fit nicely over the TRS-80® picture tube. 
It ingeniously mounts in seconds without 
any tools. 

****** 

Ths GREEN SCREEN: 

e Can be removed if needed 

e Doesn't void guarantee 

e Won't mar nor mark the unit 

We know from our own experience that 
you will be very pleased with your 
GREEN SCREEN. 

TO ORDER: send 812.50+ S2 S6H to: 

ALPHA product co. 

85-71, 79th St., Woodhaven, N.Y. 11481 
Phone Orders: (212] 296-5816 
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position the cursor exactly 
where erasing is to begin. 

2. Depress the appropriate 
direction key that would be 
needed to trace over the line to 
be erased. 

3. Immediately press the L key. 
Each tap of the L key moves the 
cursor one point along the line 
to be erased and erases one 
point on that line. Note that the 
direction key is pressed only 
once at the start of the erasing 
sequence. 

Saving Video Displays on Disk 
or Cassette 

The video display may be 
stored on disk using the subrou- 
tine containing statements 
numbered 300-385. This subrou- 
tine is accessed from the main 
program by first pressing the P 
pause command key, then 
pressing the S command key. 
Both alphanumeric and 
graphics characters are stored 
as eight, 255 byte strings. Thus 
two lines are fielded and stored 
at a time. Since two complete 
lines require 256 bytes, the last 
character of every other line is 
deleted. This, however, is a 
small price to pay for the 
simplicity of the SAVE and 
PRINT subroutines and the 
more efficient use of storage. 

Storing the video display on 
cassette can be accomplished 
using the subroutine containing 
statements numbered 500-585. 
This subroutine is accessed 
from the main program by first 
pressing the P pause command 
key, then pressing the Z com- 



mand key. Be sure that the re- 
corder is in the Record mode 
before pressing the Z key. 

As for the disk, both alpha- 
numeric and graphics char- 
acters may be stored, although 
here each character code must 
be converted into a 4-byte string, 
which requires each row to 
be entered as a separate data 
string. Thus, the cassette sub- 
routine stores 16 strings. Care 
must be taken to ensure that 
each character code fills four 
bytes (which includes the in- 
teger's sign); this is accom- 
plished by adding 100 to each 
code. Again, for the sake of effi- 
ciency, the last two characters 
of each row are deleted from 
this routine. This is more critical 
than the case with the disk sub- 
routine, and should be kept in 
mind when the sketch is drawn. 

In order to reload your sketch 
from disk storage, load the pro- 
gram and then use the com- 
mand RUN 400. Be sure that line 
400 contains the appropriate file 
name for the particular sketch 
you wish to retrieve. Also before 
running the program, you 
should modify line 300, provid- 
ing the name under which the 
new sketch will be filed. The 
subroutine fills in the video 
screen with the appropriate 
sketch and then transfers con- 
trol to the main program, with 
the cursor's beginning location 
being the bottom right-hand cor- 
ner of the screen. 

Reloading the sketch from 
cassette storage requires the 
command RUN 600. The cas- 



^^^^ ^^^^ ^^^^ ^^^^ ^^^^ ^^i^ ^^^^ ^^^^ ^^^^ ^^^^ ^^^* ^^^^ 



Doodlebug program. 



:REM 
:REH 
:REM 
: REM 
:REM 
:REM 
:REM 



LISTING FOR 



DOODLEBUG 



ALL PROGRAM LINES INCREMENT 
CONTINUOUSLY BY 5 STARTING 
AT LINE 10, ALLOWING USE OF 
"AUTO IB, 5" MODE. 



10 CLS:CLEAR1000 

15 PRINT§460,"*** DOODLE ***" 

20 PRINTe832,"BY R.D. BISHOP" 

25 PRINT: PRINT'CUSTOM COMP" 

30 PRINT"B0X 125, BRANSON, mo 65616" 

35 FOR I-1T0999:NEXTI:CLS 

:REM 

:REM INITIALIZE CURSOR POSITION 

:REM 

40 PRINT" ENTER STARTING X POSITION." 
45 INPUT"(0 TO 127) :";X:IFX>127ORX<0THEN45 
50 PRINT'ENTER STARTING Y POSITION." 
55 INPUT"(0 TO 47) :";Y:IFY>47ORY<0THEN55 
60 CLS:SET(X,Y) 

:REH 

:REM TEST FOR KEYBOARD INPUT. 

.•REM XI fc YI DEFINE INCREMENTS FOR X AND 

-.REM 

65 AS»INKEYS:IF LEN(AS)-0 THEN 65 
70 XI»0:YI«0 



36 
37 
38 



61 
62 
63 
64 
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71 


:REM 


72 


:REM TEST FOR "PAUSE" COMMAND AND 


73 


:REM "DIRECTION" COMMANDS. 


/4 


•.REM 


7 5 


IF A5="P" THEN 125 


Hid 


IF A$«"H" THEN XI-+1 :GOT0145 


85 


IF A$="F" THEN XI— l!GOT0145 


90 


IF A$«"T" THEN YI — l:GOT0145 


95 


IF A$»"B" THEN YI»+l:GOT0145 


iae 


IF A$-"R" THEN XI— 1 : YI«-1 :GOT0145 


lab 


IF A$-"U" THEN XI-+1:YI — l:GOT0145 



:YI-+l!GOT014 5 
THEN XI — l:YI-+l:GOT0145 



110 IF A$«"N" THEN XI-+1: 
115 IF A$«"C" 

120 GOTO 6 5 

121 :REM 

122 :REM "PAUSE" SEQUENCE TESTS FOR DISK 

123 :REM OR CASSETTE SAVE COMMANDS. 

124 :REM 

125 A$=INKEY$:IF LEN(A$)=0 THEN 125 
130 IF A$«"S" THEN 265 

135 IF AS-"Z" THEN 410 

140 GOTO 70 

141 :REM 
INCREMENT CURSOR POSITION. 
VERIFY THAT POSITION FITS ON SCREEN. 



142 
143 

144 



:REM 
sREM 
:REM 
145 X=X+XI 
150 IF(X<0 



:Y=Y+YI 

OR X>127)THEN X-X-XI 
155 IF(Y<0 OR Y>47) THEN Y»Y-YI 
160 P=POINT(X,Y) :SET(X,Y) 
lo5 GOSUB595 

I REN 

:REM TEST FOR "G" OR "L" COMMANDS AND 

:REM DIRECT PROGRAM TO THE CORRECT MODULE. 
16 9 :REM 
170 A$-INKEY$ 

IF LEN(A$)-0 THEN GOT0145 

IFA$-"G"THENRESET(X-XI,Y-YI) :GOT0195 

IFAS="L"THENRESET(X-XI,Y-YI) :GOT0235 

190 GOTO70 

191 :REM 
:REM "G" MODULE. CURSOR CONTINUES MOVING, BUT LE 

AVES NO 



166 
167 
168 



175 
180 
185 



192 



193 

194 
195 

200 
205 
210 
215 



.•REM 
D. 
:REM 
IF P<0 
X-X+XI 



PERMANENT MARK, UNTIL ANOTHER KEY IS PRESSE 



ELSE RESET(X,Y) 



THEN 200 
Y-Y+YI 

IF(X<0 OR X>127)THEN X-X-XI 
THEN Y=Y-YI 



"L" MODULE. PREVIOUS AND CURRENT CURSOR PO 
ERASED. IF <L> IS TAPPED, CURSOR INCREMENTS 



IF(Y<0 OR Y>47) 

P-POINT(X.Y) 
220 SET(X,Y) :GOSUB595 
225 AS«INKEY$:IF LEN(A$)=0 THEN 195 

230 GOTO 70 

231 :REM 

232 :REM 

SITION 

233 :REM 

ONE 

234 :REM STEP AND ERASES NEW POSITION. 

235 IF(X<0 OR X>127)THEN X-X-XI 
240 IF(Y<0 OR Y>47) THEN Y-Y-YI 
245 RESET(X,Y) 

250 A$«INKEY$:IF LEN (A$) LOC"ASTOP§r50 
255 IF A$-"L" THEN X-X+XI : Y-Y+YI :GOT0235 

260 GOTO 70 

261 :REM SUBROUTINE THAT SAVES DISPLAY ON DISK, 2 LI 

NES AT A TIME. J INCREMENTS ONE FOR EACH CHARACTE 

R POSITION. 
26 2 :REM Z% RECORDS THE CHARACTER CODE WHICH IS CONV 

ERTED TO STRING DATA AND ADDED TO ZP$. 
263 :REM ZP$ ENDS UP WITH 2* (64+63) -254 BYTES. PR IS 
THE PHYSICAL RECORD NUMBER. ZP$ IS FIELDED AS ZS 

26 4 : REM 

265 CLEAR1000:OPEN"R" ,1, "SKETCH01" 

27 FOR I-0TO15 STEP2 
275 ZP$-"" 

280 FOR K-0TO1 

285 FOR J-0 TO 63-K 

290 Z%-PEEK(15360+J+64*I+64*K) 

295 ZZS-MKIS(Z%) 

300 ZP$-ZP$+ZZ$ 

305 NEXT J 

310 NEXT K 

315 FIELD 1,254 AS Z$:PR»INT ( I/2+.5) +1 

320 GET1,PR 

325 LSETZS=ZP$ 

330 PUT1,PR 

335 NEXTI 

340 CLS:PRINT"SKETCH IS SAVED ON DISK." 

34 5 CLOSE 

350 END 

351 :REM SUBROUTINE THAT LOADS DISPLAY FROM DISK. EA 

CH OF THE 8 PHYSICAL RECORDS IS BROUGHT OUT AND DI 
SPLAYED. 

352 :REM THE LAST 3 CHARACTERS ARE DELETED TO PREVEN 

T ROLL-OVER. 

353 :REM STARTING VALUES FOR X AND Y ARE ASSIGNED. T 

HE PROGRAM IS RETURNED TO THE MAIN PROGRAM FOR KEY 
BOARD INPUT, ALLOWING ADDITIONS TO THE SKETCH. 

354 :REM 

355 CLEAR1000:CLS:PRINT0515,"** INSERT DISK THAT CONTAI 

NS SKETCH AND PRESS <ENTER>. **" ; : INPUTZMS :CLS:OP 
EN"R",1,"SKETCH01" 



ATTENTION 
SOFTWARE 
AUTHORS 

From The Company That 
Brought You Adventure , 
by Scott Adams 

We are now accepting TRS-80, 
Apple, and Atari software for 
review to manufacture under the 
Adventure International label. • 
Join the fastest growing software 
company in the U.S. and enjoy a 
money paying hobby as well. Just 
send a machine readable copy of 
your program with documentation 
to: Adventure International, Box 
3435, Longwood, Florida 32730 
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adventure 
international 

IMHMIHMtMMtWMf HIMB 1 IMIMMUHHIlHltllHHHHlOHm^ 

TRS-80® CP/M® &CBASIC® 
BUSINESS SOFTWARE 



LOW-COST MOD II DISK EXPANSION 
. . . over 610,000 bytes/disk with our 
CP/M . . . plus many other features. 

Find out why ours is the Better Business Buyf 

Model II CP/M(rel. 2.0) $250.00 

Model 1 CP/M (re. 1.5) 1 50.00 

CBASIC 95.00 

APH (Automated Patient History) 1 75.00 

RESIDENTIAL PROPERTY ANALYSIS 

system 300.00 

MAGIC WAND® Word Processor .... 400.00 
RM COBOL® (Z80 code) 750.00 

Osborne & Assoc. CBASIC source programs — 

O&A Payroll w/Cost Accounting $250.00 

O&A Accts. Rec./Accts. Payable . . . 250.00 
O&A General Ledger w/Cash Journal. 250.00 
O&A CBASIC books for above (each). . . . 20.00 

Send 30C SASE for CP/M Users Group software 
list & free "CP/M Primer". 

• MA(,K \fcANO.s«<r 4 *>r<r,Ji<*lrm*,k of 5fflO«l BvlWWM Appt-.X.om Irw 

» km ( OBO< n a reojtatereil trademark ol *v.*n m. i arland Corp 
•> IMS 80 *■• j 'eyMned i<***r(Tujik ol k*Jk; Sim* d I ■»»>,)> ■ ompan« 
■ tP'M narejinicwd if+dei w arfc <>• i>m»i,iikrv<in h 

• CUASK "..i rfi.Mftrdl»ad«-ouHk ul Vil'wdtr S.sVn.s 



1714) 848-1922 
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36 
365 
370 
37'j 
380 
385 
390 
395 
400 
405 
406 



409 
410 
420 
425 
430 
435 
440 
445 
450 
455 
460 
465 
470 
475 
480 
485 
490 
491 



494 

495 

500 
505 
510 
515 
520 
525 
530 
535 
540 
545 
550 
55 5 
560 
565 
570 
57 5 
580 
585 
590 
591 
592 

593 
594 
595 



FOR I-1T08 

PI ELD 1, 2 54 AS ZS 

GET 1,1 

IF 1=8 THEN ZS=LEFTS(Z$, 252) 

PRINT Z$;" "; 

NEXT I 

X=127:Y=47 

CLOSE 

SET(X.Y) 

GOTO 6 5 

:REH SUBROUTINE TO CSAVE DISPLAY ON CASSETTE. 

HIT THE CMD"T" AND CMD"R" COMMANDS IF A DISK-DRIVE 
IS NOT ON-LINE. 
:REM EACH ROW IS SAVED SEPARATELY AS A STRING OF 
CHRS CODES. TO INSURE UNIFORM RECORD SIZE OF 4 BY 

TES, 100 IS ADDED IF THE CODE IS LESS THAN 100. 
:REM THE CODE IS CONVERTED TO STRING DATA AND ADDE 

D ONTO ZP$. EACH ROW IS THEN RECORDED ON CASSETTE 

:REM 

CLEAR 1000:CMD"T" 

FOR 1=0 TO 15 

ZP$«"" 

FOR J=0TO6 2 

Z%=PEEK(15360+J+64*I) 

Z*=Z%+100 

ZZ$=STR$(Z%) 

ZPS=ZP$+ZZ$ 

NEXT J 

PRINT#-1,ZP$ 

NEXTI 

CLS: PRINT" YOUR SKETCH IS SAVED" 

PRINT'ON CASSETTE AS 16 DATA ITEMS." 

CMD'R" 

END 

CLEAR1000 

:REM SUBROUTINE THAT CLOADS VIDEO DISPLAY INFO F 

ROM CASSETTE. OMIT CMD"T" AND CMD"R" INSTRUCTIONS 

IF A DISK SYSTEM IS NOT ON-LINE. 
:REM EACH LINE IS READ IN AS ZPS. ZPS IS THEN S 

LICED INTO 4 BYTE SECTIONS, EACH BYTE CORRESPONDIN 

G TO A CHRS CODE, Z%. 100 IS SUBTRACTED FROM EACH 

CODE AND THE RESULT IS POKED INTO THE DISPLAY. 
:REM THE LAST TWO COLUMNS OF THE DISPLAY DO NOT 

TRANSFER, SO THESE ARE FILLED WITH BLANKS TO ERASE 
"NWANTED CHARACTERS. X AND Y ARE ASSIGNED STARTI 

NG VALUES AND PROGRAM RETURNS TO AWAIT INPUT. 
I REN 
PRINT9515, "INSERT TAPE TO LOAD DOODLE; PLAY MODE; P 

RESS <ENTER>.":INPUTZM$ 
CMD"T" 
CLS 

FOR I=0TO15 
INPUT#-1,ZP$ 
ZP$="+"+ZPS 
FOR J=0TO61 
ZZ$=MID$(ZP$,4*J+1,4) 
Z*=VAL(ZZS! 
Z%=Z%-100 

POKE 15360»J+64*I,Z% 
NEXTJ 

POKE 15423*64*1,032 
POKE 15422-64*1,032 
NEXTI 

POKE 15422, 032:POKE 15423,032 
X=127:Y=47 
SET(X,Y) 
CMD"R" 
GOTO 6 5 
:REM 
:REM 
AS 
:REM 
:REM 
FOR I=1T04 



TIME DELAY SUBROUTINE. 
DESIRED. 

1 1 NEXTI : RETURN 



LENGTHEN OR SHORTEN 



sette recorder must be in Play 
mode. Again, the subroutine 
transfers control to the main 
program, with the cursor 
located at the bottom right-hand 
corner of the screen. 

It should be noted that these 
sets of subroutines are entirely 
general in nature and can be 
used with any type of program 
that generates a graphics 
display that you might wish to 
preserve for future use. The 
following comments relating to 
the program listing need to be 
emphasized: 

1 . Only one Clear 1000 instruc- 
tion needs to be used for the en- 
tire program. 

2. For a system that does not 
have a disk drive, it is not neces- 
sary to include a CMD'T" or 
CMD"R" instruction. 

3. For applications other than 
Doodle, where it is not neces- 
sary to set new data points or 
change the sketch, lines 435, 
445, 660 and 665 are unneces- 
sary. 

Program Modifications 

You may desire to slow down 
the program so the lines do not 
develop so fast. This may be 
especially true if children are to 
be using the program. (And, 
believe me, are kids ever 
fascinated by the sketches they 
can generate!) Just change the 
timing loop in line 999, using a 
number larger than 40. 

On the other hand, you may 
wish to stop the line generation 
function altogether, so that only 
one point is made each time a 
direction key is depressed. This 
is most easily accomplished by 
deleting line 110, changing the 



GOTO statements in lines 116 
and 220 to GOTO 1 15 and GOTO 
220 and changing line 215 to 
SET(X,Y), deleting the 
GOSUB999 instruction. 

The direction keys chosen are 
those conveniently reached us- 
ing the left hand. If you prefer to 
exercise directional control us- 
ing your right hand, you may 
wish to change the U key to Y 
(line number 65). The P and L 
keys may be moved to the left 
side of the keyboard, perhaps 
using 1 in place of P in line 35 
and 3 in place of L in lines 125 
and 260. 

Finally, in order to insert cap- 
tions, titles, labels, etc., first 
complete your sketch and then 
determine just where each of 
these labels should be placed 
on the screen using the PRINT 
@ XXX, statement. Next, save 
the sketch on disk or cassette. 
Now insert your PRINT @ XXX, 
statements into the program be- 
tween lines 430 and 450 (disk) or 
between lines 657 and 680 
(cassette), taking care not to 
erase any other program lines. 
Now a RUN 400 or RUN 600 will 
display the sketch complete 
with titles and labels. This new 
sketch can be saved right over 
the disk or cassette recordings 
of the old sketch, but this time 
all of the alphanumeric infor- 
mation will be included with the 
sketch. 

With this article, I anticipate a 
whole new approach to the 
advertising campaigns of micro- 
computer manufacturers: "Be 
the first in your neighborhood 
with the most elaborate, expen- 
sive and versatile doodle-pad 
ever invented!" ■ 



UCSD Pascal* for TRS-oW Model II 



The Standard Package: Operating System D Compiler a Screen Editor n Filer a Library D Z-80 Assembler 
□ Patch Utility Program □ 280 page User Manual a Jensen & Wirth Pascal Reference Manual a Bowles' Beginners 
Guide To UCSD Pascal □ tutorial disk. 



Plus: 

• Single or double density diskettes in one or more 
standard formats. 

• Disk Formatting program. 

• Configuration program for serial I/O. 
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PCD SYSTEMS 



$350 Complete 

$300 without 
manuals or 
tutorial disk 



Optional Utility Programs: 

• File conversion— 

CP/M* to Pascal $50.00 

TRSDOS t to Pascal $50.00 

•Z-80 Disassembler/Dump Program $50.00 



P. O. Box 1 43 • Penn Yan • New York 1 4527 • 31 5-536-3734 



•Trademark of the Regents of the University of ( alilornia 



1 trademark of Tandy Corp. 



I trademark of Digital Research Corp. 
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PROFESSIONAL 




BUSINESS MICRO LIBRARY 



Professionally developed and field-tested business and accounting software for 
your *TRS-80 Model I or II from the acknowledged leader in micro-business 
systems. 



169.95 



189.95 



219.95 



189.95 



67.95 



219.95 



97.95 



CBOOK/80 THE ELECTRONIC BOOKKEEPER 

Single-entry bookkeeping system with a chart of accounts which matches Federal 
Income Tax Schedule C (Profit or Loss from Business or Profession) 

Develops standard-format Profit & Loss Statements throughout the year and 
automatically produces a full Schedule C in IRS-approved format at tax-filing time. 

DEPCOMP/80 DEPRECIATION COMPUTATIONS 

Computes depreciation of depreciable assets by any (selected) method. Prints out 
depreciation schedules for asset's life, or for selected years. 

Stores client's entire asset list and prints out his complete yearly depreciation 
schedule. Lrsts are updatable as required. A must for the busy accountant or tax 
practitioner. 

ASSETS/80 ASSET TRANSACTIONS 

Accepts entry of mixed long and short term asset transactions, computes holding 
period from dates bought and sold, and prints out separate long-term and short-term 
transaction lists, ready for inclusion in Schedule D at tax time, or for determination 
of the client's position for any period. 

LOANCOMP/80 LOAN COMPUTATIONS 

Computes interest and principal balance for monthly, annual, and loan total periods. 
Computes payments required to amortize a loan. Makes the "True Annual Parcen- 
taga Rata"computatlon! Has a separate section which analyzes ordinary annuities 
with monthly, quarterly, semi-annual, and annual payments. 

For any of the above, prints out summarizing statements or your choice of three 
types of amortization schedules. 

We recommend this program to anyone in the accounting professions or concerned 
in any way with financing. 

STATEMENT/80 PREPARES ITEMIZED STATEMENTS 

of any desired form (Profit & Loss, Rental Income, etc.) and prints out the form, with 
computations made automatically. 

FORMLET/80 FOR PREPARING FORM LETTERS 

from a selection of pre-written and stored stock paragraphs. Will store up to ten of 
such letters on disk and allow you to select among them at will. You may intermix 
fresh text, of course. 

TYP/PRT/80 SMALL BUT MIGHTY 

Not only permits use of the printer as a typewriter but will allow you to retain any 
display already on the video, make notes from it, or actually copy it on the printer 
automatically. This program will run concurrently with another program you may be 
using and you can go from one to the other at will. Also contains a calculator. So 
useful it is hard to describe here. 

• • • * • FOR DISK BASED SYSTEMS ONLY* • • • • 

Write on letterhead, or call, for free 
brochure and sample outputs. 

"TRS-80 is a registered trademark of Tandy Corporation 

CONTRACT SERVICES ASSOCIATES 



Model I 



Model 



199.95 



37.95 



47.95 



17.95 



47.95 



57.95 



24.95 



• 10 



706 SOUTH EUCLID 



ANAHEIM, CA 92802 



TELEPHONE (714) 635-4055 
• • • 20 YEARS OF SERVICE • • • 
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GENERAL 



A computerized kaleidoscope for your Level II 16K. 



Kaleidopen 



Robert F. Nicholas 
2-B Lennox Heights 
Lennox, MA 01240 



Remember kaleidoscopes? 
Those little cardboard 
tubes filled with brightly colored 
shapes and mirrors? How we 
stared into them, twisting them 
around to create dazzling de- 
signs! 

Kaleidoscopic designs can be 
fascinating, and they make 
great patterns for painting, 
needlepoint, fabrics and other 
crafts projects. 

You've probably seen a 
kaleidoscope program running 
on a computer, and you've un- 
doubtedly wished that you 
could create some of those pat- 
terns yourself. Why should the 
computer have all the fun? Well 
now you can jump right in there 
and explore your creative poten- 
tial. 

How It Works 

Before you begin drawing, 
you need to understand how the 
program works. As you can see 
from Fig. 1, your video screen is 
split into four quadrants. As you 
draw in the upper left-hand 
quadrant, the computer creates 
mirror images of your design in 
the other three. 

Points in quadrant I are de- 
fined as (X,Y) and are printed by 
using the SET command. Re- 
member that your screen is 128 
(0 to 127) by 48 (0 to 47). 
Therefore, points in quadrant II 
must be defined as (127-X.Y) in 
order to produce a mirror image 
to the right. 

Similarly, quadrant III uses 
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Fig. 1. 



(X.47-Y) to produce a mirror im- 
age looking down. And in quad- 
rant IV, (127-X.47-Y) creates a 
mirror image looking down and 
to the right. The total effect is of 
a kaleidoscopic pattern cen- 
tered on the screen. 

Running Kaleidopen you are 
asked to specify the starting co- 
ordinate for your design. Enter 
the X (0 to 63) and Y (0 to 23) co- 
ordinate as a pair separated by a 
comma. For example, try 20,10. 
This is the only time you will use 
the ENTER key while drawing. 
For the rest of the commands, 
simply press the key you desire. 

Fig. 2 shows the eight direc- 
tions used in the program. Just 
press any key (one-eight) and 
when the line has reached the 
location you want, press the S 
key to stop it. Then press the 
number of the next direction you 
want. Continue until your design 
is finished. 

Notice that you are only draw- 
ing in quadrant I, but that the 
computer is simultaneously 
drawing the appropriate mirror 



images in the other three quad- 
rants. Always remember that 
your directions refer to quadrant 
I only! 

Suppose You Make a Mistake 

Now we all make mistakes 
once in awhile. If you make an 
error, just press B to clear the 
board and begin a new pattern 
from scratch. If, on the other 
hand, it is just a case of having 
drawn a line too long, use the E 
key to erase. 

Suppose I drew a line in direc- 
tion four, but failed to stop in 
time. I simply press E to erase, 
followed by eight. I erase in 
direction eight because, as you 
can see from Fig. 2, eight is the 
direction opposite four. If I drew 
in direction one, I would have to 
erase in direction five. 

You can also use the E key to 
skip to a new position on the 
screen without leaving a trace. 
For instance, pressing E-three 
moves the point up without 
drawing a line. Pressing S stops 
at a new position. 

The only problem is that you 
may pass over a line you want- 
ed. The result is an erasure at 
that point. The trick is to move 
up to the line in the E mode, 
stop, draw one point and then 
go back into the E mode again to 
keep moving without leaving a 
trace. It takes a little practice, 
but really isn't that difficult. 

If you are feeling ambitious, 
you can build a move command 




420 INPUT-ENTER STARTING 


CQORDINAlt'j 


A v'.. Vi.1 1,1 


(0-4/ 1 


" i k t T 


440 IF ( Xi.0 OR X>127 ) OR 


(Y'.O OR i 4 


I THLN 4^0 






1100 IF X4R<0 OR X+R.-127 


OR Y + IK0 OR 

Example 1. 


tlU. 47 THLN 


4 60 





Fig. 2. 

(M) that moves without leaving a 
trace and does not erase any- 
thing already on the screen. 
(Hint: Use the POINT (X,Y) com- 
mand.) 

So what do you do with your 
masterpiece once you've com- 
pleted it? Why save it on tape of 
course! That way you can recall 
your best creations for use in 
projects or for putting on your 
own one man art show. 

Put a blank tape into your 
recorder, position it, note its 
location, be sure your cables are 
all connected and depress both 
the play and record buttons. 
Now press the P key to save 
your design on tape. 

The entire process takes 
about 80 seconds. The screen 
clears when the process is com- 
pleted and you will be told that 
the picture has been saved. 

If you wish to recall a picture 
from tape, respond yes when 
you are asked. Rewind the tape 
to the correct position, plug in 
the cables, depress the play but- 
ton and hit ENTER. Your picture 
prints on the screen in 45 sec- 
onds. 

And that's all there is to it! 
The program includes a brief 
summary of the drawing com- 
mands to refresh your memory. 
So limber up your fingers and 
begin creating with KALEID- 
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from PROGRAM MA 

HI-RESOLUTION GRAPHICS FOR THE TRS-80 




LOWER CASE 

The 80 GRAF IX board includes 

two sets of lower case characters 

at no additional cost. 



DEMONSTRATION PROGRAMS 

The 80 GRAFIX board is supplied 
with a Character Generator software 
and several demonstration programs. 




REAL-TIME GRAPHIC GAMES 

With the 80 GRAFIX board you can 

write exciting real-time games using 

BASIC 






FINALLY, AT LAST. . . 

HI RESOLUTION GRAPHICS is available for your 
TRS-80 computer system The 80 GRAFIX board from 
PROGRAMMA International. Inc. gives your TRS-80 high 
resolution capability that is greater than the Commodore 
CBM/PET or even the revered APPLE II 

80 GRAFIX gives the TRS-80 an effective screen of 
384X192 pixels, versus the normal 127X192 for the 
TRS-80. 80X50 for the CBM/PET. or the 280X192 of an 
APPLE II As an added feature. 80 GRAFIX offers you 
■ower case characters at no additional cost. Of course, you 
:an also create your own set of up to 64 original characters 
using the supplied Character Generator software. 

The 80 GRAFIX board is simple to install (note that this 
voids your Radio Shack warranty), and programming is 
done through BASIC. BO-GRAF IX opens up a whole new 
realm of software development and excitement never 
dreamed of for the TRS-80! 




EASY INSTALLATION 

The 80 GRAF IX board is simple to 
install and fits inside the TRS-80 case. 



INVERSE VIDEO 

The 80 GRAF IX board allows you to 

do inverse video to high-light your 

screen displays. 






MM WUM-MB *«•!*$*» ©HI V!*t C«» 
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CHARACTER GENERATOR 

The supplied character generator 

software allows you to create your 

own character set of up to 

64 original characters. 



i, '« 'I *l'i M'l'J JJJL" 

•I "I".*! ' "'•*** 

ir % n •m» f n»»-B 1 i.j 

B'» uumoara 

--*■, mmnm 
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■••■ 



GRAPHICS GALORE 

The 80 GRAFIX board and 

the supplied Character Generator 

allow you to become an artist. 



im n«r it H «. 
ci it h ■• 
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ELECTRONIC DESIGN 

The 80 GRAFIX board has unlimited 

application in Electronic design 

and Education. 




80-GRAFIX HI-RESOLUTION 

Finally, the only means to protect 

your computer investment is to order 

an 80 GRAFIX board TODAYI 




EXCITEMENT & FUN 

Open up a new realm of software 

development with the 80 GRAFIX 

board. 



Available exclusively through PROGRAMMA at the cost of $149.95 

Please check with us for availability prior to ordering 

VISA and MASTERCHARGE accepted 

TRS-80 is a registered trademark of the Tandy Corp. ^21 



PROGRAMMA 
INTERNATIONAL, INC. 

3400 Wilshire Blvd. 

Los Angeles, CA 90010 

(213) 384-0579 • 384-1116 ' 384-1117 



OPEN. 

Modifications 

You can modify the program 
to produce only one mirror im- 
age (bilateral symmetry?) by 
deleting lines 1200, 1210, 1260 
and 1270. Also change lines 420, 



440 and 1100 as indicated in Ex- 
ample 1. 

To create one large drawing 
board (the entire screen), delete 
lines 1190, 1200. 1210, 1250, 
1260 and 1270 and change lines 
420, 440 and 1 100 as indicated in 
Example 2. ■ 



420 INPUT -LNILh S I Ah 


1NG COORDINATES X (0-63)f1 t0-47) 


"SXrY 


440 IP < X,0 UK X tj i 


liR il OR t. '47 I THtN *2l 




1100 IF X+R OR x-il-: 


6j OR YtU-.O UR t*J. 4/ THEN 460 

Example 2. 





Program Listing 



KALEIDOPEN 
ROBERT F. NICHOLAS 



10 ' 

20 ' 

30 CLS 

40 DEFINT A-Z 

50 CLEAR 2000 

60 PRINT«456,CHRS(23)"K ALEIDOPE N"| 

70 FOR TI-1 TO 1500 

60 NEXT TI 

90 CLS 

100 DIM P$(5) 

110 PRINT'THIS IS A KALEIDOPEN. 

120 PRINT" PRESS A * FROM 1 TO 8 FOR DIRECTION OF 

YOUR MOVE. 
130 PRINT" PRESS 'S' TO STOP A LINE. 
140 PRINT" PRESS 'E' TO ERASE (FOLLOWED BY THE DIR 

ECTION •) . 
150 PRINT" ALSO USE 'E' TO SKIP TO A NEW P 

OSITION WITHOUT 
160 PRINT" LEAVING A TRACE. 

17 PRINT" PRESS 'B< TO CLEAR SCREEN AND GET A NEW 

DRAWING BOARD. 
180 PRINT 

190 PRINT" THE DIRECTIONS ARE AS FOLLOWS: 

1224 PRINTe728,"+"; 
210 PRINT0736,"1"; 
220 PRINT0668,"2"; 
230 PRINT0600,"3"j 
240 PRINT0660,"4"; 
250 PRINT0721, "5"; 
260 PRINT#788,"6"| 
270 PRINT0856,"7"; 
280 PRINT0796,"8"; 
290 PRINT0960," "; 

300 INPUT'HIT ENTER TO CONTINUE DIRECTIONS" ;X 
310 CLS 
320 PRINT" NOTE THAT YOU DO NOT HIT THE ENTER KEY WHI 

LE YOU ARE 
330 PRINT'DRAWING A PICTURE. JUST PRESS THE KEY YOU DE 

SIRE. 
340 PRINT 
350 PRINT" IF YOU WISH TO SAVE ONE OF YOUR PICTURES, 

DEPRESS BOTH 
360 PRINT"PLAY AND RECORD KEYS ON RECORDER AND THEN PRE 

SS 'P'. 
370 PRINT 
380 INPUT'DO YOU WANT TO RECALL A PICTURE PREVIOUSLY SA 

VED (Y/N)";Z$ 
390 CLS 

400 ZS-LEFT$(ZS,1) 
410 IF Z$-"Y" THEN 1470 
420 INPUT'ENTER STARTING COORDINATES X (0-63), Y (0-23)" 

;X,Y 
430 CLS 

440 IF (X<0 OR X>63) OR (Y<0 OR Y>23) THEN 420 
450 GOSUB 1170 
460 E-i 
470 A$-"" 
480 B$-"" 
490 U-0 
500 R-0 

510 REM INKEYS ROUTINE TO ENTER DRAWING COMMANDS 
520 B$-INKEY$ 
530 REM STOP DRAWING 
540 IF BSO'S" THEN 580 
550 GOSUB 117 
560 GOTO 460 

570 REM GO INTO ERASE MODE 
580 IF B$0"E" THEN 640 
590 E-l 
600 B$-"" 
610 GOSUB 1230 
620 GOTO 520 



630 REM CLEAR THE BOARD AND BEGIN A NEW DESIGN 

640 IF BSO'B" THEN 680 

650 CLS 

660 GOTO 420 

670 REM GO SAVE THE DESIGN ON TAPE 

680 IF B$-"P" THEN 1300 

690 AS-AS+BS 

700 REM DRAW WEST 

710 IF AS<>"5" THEN 760 

720 R— 1 

730 U-0 

740 GOTO 1100 

7 50 REM DRAW NORTHWEST 

760 IF A$<>"4" THEN 810 

770 R— 1 

7 80 U— 1 

790 GOTO 1100 

800 REM DRAW EAST 

810 IF A$<>"1" THEN 860 

820 R-l 

830 U-0 

840 GOTO 1100 

850 DRAW SOUTHWEST 

860 IF A$<>"6" THEN 910 

870 R— 1 

880 U-l 

890 GOTO 1100 

900 REM DRAW NORTH 

910 IF A$<>"3" THEN 960 

920 R-0 

930 U— 1 

940 GOTO 1100 

950 REM DRAW SOUTHEAST 

960 IF AS<>"8" THEN 1010 

970 R-l 

980 U-l 

990 GOTO 1100 

1000 REM DRAW SOUTH 

1010 IF A$<>"7" THEN 1060 

1020 R-0 

1030 U-l 

1040 GOTO 1100 

1050 REM DRAW NORTHEAST 

1060 IF A$<>"2" THEN 520 

1070 R-l 

1080 U— 1 

1090 REM CHECK NEW POSITION IS WITHIN SCREEN BOUNDARIES 

1100 IF X+R<0 OR X+R>63 OR Y+U<0 OR Y+U>23 THEN 460 

1110 X-X+R 

1120 Y-Y+U 

1130 GOSUB 117 

1140 IF E-l THEN GOSUB 1230 

1150 B$-"" 

1160 GOTO 520 

1170 REM SET POINTS IN ALL FOUR QUADRANTS 

1180 SET(X,Y) 

1190 SET(127-X,Y) 

1200 SET(X,47-Y) 

1210 SET(127-X,47-Y) 

1220 RETURN 

1230 REM RESET POINTS IN ALL FOUR QUADRANTS 

1240 RESET(X,Y) 

1250 RESET(127-X,Y) 

1260 RESET(X,47-Y) 

1270 RESET(127-X,47-Y) 

1280 RETURN 

1290 REM SAVE DESIGN ON TAPE 

1300 P$-"" 

1310 N-l 

1320 FOR X-15360 TO 16382 

1330 P-PEEK(X) 

1340 IF P-32 THEN P$-P$+CHR$ (128) ELSE PS-PS4-CHRS (P) 

1350 N-N+l 

1360 IF N<250 THEN 1400 

1370 N-l 

1380 PRINT«-1,P$ 

1390 PS-"" 

1400 NEXT X 

1410 P-PEEK(16383) 

1420 PRINTI-1,P$,P 

1430 CLS 

1440 PRINT'PICTURE HAS BEEN SAVED. 

1450 GOTO 380 

1460 REM RECALL DESIGN FROM TAPE 

1470 PRINT" DEPRESS PLAY BUTTON ON RECORDER. AFTER P 

ICTURE HAS BEEN 
1480 PRINT'PRINTED, HIT 'ENTER' TO ERASE SCREEN AND BEG 

IN ANOTHER DESIGN. 
1490 PRINT'WHEN TAPE RECORDER IS READY, HIT 'ENTER'. 
1500 INPUTX 
1510 CLS 

1520 FOR J-l TO 4 
1530 INPUT#-1,PS(J) 
1540 NEXT J 
1550 INPUT#-1,P$(5),P 
1560 PRINT00,""j 
1570 FOR J-l TO 5 
1580 PRINT P$(J) ; 
1590 NEXT J 
1600 POKE lv383,P 

1610 IF INKEYS- 6 " THEN 1610 ELSE CLS 
1620 GOTO 380 
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the electric pencil II 

^* ©1980 Michael Shrayer 

for the TRS-80 Model IT Computer 




The Electric Pencil is a Character Oriented Word Processing 
System. This means that text is entered as a continuous string 
of characters and is manipulated as such. This allows the user 
enormous freedom and ease in the movement and handling of 
text. Since lines are not delineated, any number of char- 
acters, words, lines or paragraphs may be inserted or deleted 
anywhere in the text. The entirety of the text shifts and 
opens up or closes as needed in full view of the user. Car- 
riage returns as well as word hyphenation are not required 
since each line of text is formatted automatically. 

As text is typed and the end of a screen line is reached, a 
partially completed word is shifted to the beginning of the 
following line. Whenever text is inserted or deleted, existing 
text is pushed down or pulled up in a wrap around fashion. 
Everything appears on the video display screen as it occurs 
thereby eliminating any guesswork. Text may be reviewed at 
will by variable speed or page-at-a-time scrolling both in the 
forward and reverse directions. By using the search or the 
search and replace function, any string of characters may be 
located and/or replaced with any other string of characters as 
desired. Specific sets of characters within encoded strings 
may also be located. 

When text is printed, The Electric Pencil automatically 
inserts carriage returns where they are needed. Numerous 
combinations of Line Length, Page Length, Character Spacing, 
Line Spacing and Page Spacing allow for any form to be 
handled. Right justification gives right-hand margins that 
are even. Pages may be numbered as well as titled. 



the electric pencil 

-a Proven Word Processing System 

The TRSDOS versions of The Electric Pencil II are our best 
ever! You can now type as fast as you like without losing any 
characters. New TRSDOS features include word left, word right, 
word delete, bottom of page numbering as well as extended 
cursor controls for greater user flexibility. BASIC files may 
also be written and simply edited without additional software. 

Our CP/M versions are the same as we have been distributing 
far several years and allow the CP/M user to edit CP/M files 
with the oddition of our CONVERT utility for an additional 
$35.00. CONVERT is not required if only quick and easy word 
processing is required. A keyboard buffer permits fast typing 
without character loss. 

CP/M TRSDOS 
Serial Diablo, NEC, Qume $ 300.00 $ 350.00 
All other printers $ 275.00 $ 325.00 

The Electric Pencil I is still available for TRS-80 Model I 
users. Although not as sophisticated as Electric Pencil II, it 
is still an extremely easy to use and powerful word processing 
system. The software has been designed to be used with both 
Level I (I6K system) and Level II models of the TRS-80. Two 
versions, one for use with cassette, and one for use with disk, 
are available on cassette. The TRS-80 disk version is easily 
transferred to disk and is fully interactive with the READ, 
WRITE, DIR, and KILL routines of TRSDOS. 




Features 

TRSDOS or CP/M Compatible * Supports Four Disk 
Drives * Dynamic Print Formatting * Diablo, NEC & 
Qume Print Packages * Multi-Column Printing * Print 
Value Chaining » Page-at-a-time Scrolling • 
Bidirectional Multispeed Scrolling * Subsystem with 
Print Value Scoreboard * Automatic Word & Record 
Number Tally * Global Search & Replace * Full Margin 
Control * End of Page Control » Non Printing Text 
Commenting ♦ Line & Paragraph Indentation * 
Centering » Underlining * Boldface 




master charge 



•TRSflO is a registered trade mart ot Radio SnacK, a division o) Tandy Cofp 



TRC Cassette $ 100.00 

TRD Disk $ 150.00 
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MICHAEL SHRAYER SOFTWARE, INC. 

1198 Los Robles Dr. 

Palm Springs, CA. 92262 

(714) 323-1400 



• Reader Service -see page 162 
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GENERAL 

Have fun with PEEK & POKE 

making your game simulations realistic 

Real-time Graphics 



Richard A. Zidonis 
4500 Ardmore Ave. 
Cleveland OH 44144 



It your friends were like mine, 
the first thing they asked 
about your computer was, 
"What can it do?" Most likely, 
you responded by loading a 
game program. As time went on, 
you became less impressed 
with the standard Wumpus or 
lander game and struck out on 
your own to develop the ultimate 
game program. And that's where 
we begin! 

PEEKing 

I have a Radio Shack TRS-80, 



16K, Level II system. 

The TRS-80 has an available 
command called IN KEYS. The IN- 
KEY$ function returns a one- 
character string equal to a 
strobed keyboard depression. 
This allows you to interact with 
the system during real time. 
Visions of real-time video games 
came to my mind at once. But as 
often happens, problems came 
into play. For instance, if you 
had a dot on the screen that you 
wished to move to the left, a 
single keystroke could start it 
moving, but another keystroke 
would be needed to stop it. This 
problem was quite troublesome 
for awhile, but the solution final- 
ly materialized. 



We will develop a method of 
moving and stopping a game 
paddle with a single keystroke, 
and at computer real time. Not 
only that, but we're also going to 
move it at a speed rivaling a true 
analog-input video game. 

To do this we first need to 
develop a method of deter- 
mining the presence of a single 
depressed key. The TRS-80 
system is memory mapped. 
Upon looking at the memory 
map, we find that the keyboard 
is located between memory 
locations decimal 14336 and 
decimal 15359. Knowing that, 
let's PEEK some keyboard loca- 
tions. 

The PEEK command in Level 



II requires that a variable be 
assigned to what is found at the 
PEEK location. As in the state- 
ment X = PEEK (14337), the 
decimal value of memory loca- 
tion 14337 is assigned to the 
variable X. Still with me? Since 
we can only assign variables to 
alpha (A) or alphanumeric (A1) 
characters, we are only inter- 
ested in PEEKing the letters of 
the alphabet. Refer to Table 1. 
Note the first 16 keyboard mem- 
ory locations (for the alphabet) 
and the PEEK value for each let- 
ter of the alphabet. If you are 
saying to yourself that it looks 
repetitive and long, don't de- 
spair; it's not. 

If we tell the system X = PEEK 





14336 14337 


14338 


14339 


14340 


14341 


14342 14343 14344 


14345 


14346 


14347 


14348 


14349 


14350 


14351 


A 





2 





2 





2 





2 





2 





2 





2 





2 


B 




4 




4 




4 




4 




4 




4 




4 




4 


C 




8 




8 




8 




8 




8 




8 




8 




8 


D 




16 




16 




16 




16 




16 




16 




16 




16 


E 




32 




32 




32 




32 




32 




32 




32 




32 


F 




64 




64 




64 




64 




64 




64 




64 




64 


G 
H 




128 




128 




128 




128 




128 




128 




128 




128 








1 


1 








1 


1 








1 


1 








1 


1 


] 






2 


2 






2 


2 






2 


2 






2 


2 


J 






4 


4 






4 


4 






4 


4 






4 


4 


K 






8 


8 






8 


8 






8 


8 






8 


8 


L 






16 


16 






16 


16 






16 


16 






16 


16 


M 






32 


32 






32 


32 






32 


32 






32 


32 


N 






64 


64 






64 


64 






64 


64 






64 


64 


O 

P 






128 


128 






128 


128 






128 


128 






128 


128 














1 


1 


1 


1 














1 


1 


1 


1 


Q 










2 


2 


2 


2 










2 


2 


2 


2 


R 










4 


4 


4 


4 










4 


4 


4 


4 


S 










8 


8 


8 


8 










8 


8 


8 


8 


T 










16 


16 


16 


16 










16 


16 


16 


16 


U 










32 


32 


32 


32 










32 


32 


32 


32 


V 










64 


64 


64 


64 










64 


64 


64 


64 


w 

X 










128 


128 


128 


128 










128 


128 


128 


128 


























1 


1 


1 


1 


1 


1 


1 


1 


Y 


















2 


2 


2 


2 


2 


2 


2 


2 


Z 


















4 


4 


4 


4 


4 


4 


4 


4 














Table 1. PEEK chart 
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blQbl NOW... 
PEW5E THE 
PRICE 15 
QOINQ <IP. 






If you haven't made up your mind yet about a subscription to 80 Microcomput- 
ing . . . NOW IS THE TIME. July 1, 1980, the cover price of 80 Microcomputing is 
increasing to $2.50 and along with it the subscription prices are going up. BUT, 
80 Microcomputing is extending the time that you can subscribe or renew AT 
THE OLD RATES until July 18, 1980. 

You've seen the first issues of 80 Microcomputing and now you know that we 
were serious when we said we'd bring you the most complete journal for the 
users of the TRS-80* . . . one filled with applications, reviews, programs and 
more of Wayne Green's thought-provoking editorials. SO SIGN UP TODAY at 
$15.00/1 year, $24.00/2 years and $36.00/3 years rather than get hit by inflation 
again and pay the new rates of $18.00/$30.00/$45.00. 



ALL PREVIOUS SUBSCRIPTION OFFERS TO 
80 MICROCOMPUTING ARE VOID JULY 18, 1980 




New Subscription 3 Renewal (please affix an address label from your most recent magazine) 
n 1 year/$15.00 H 2 years/$24.00 C 3 years/$36.00 

Payment enclosed Bill: U Me D Master Charge I VISA □ AMEREX 



Card # 




Signature 



Expire Date_ 
Name/Label 

Address 

City 



Interbank # 



State 



Zip 




m 



Canadian $15.00/1 year only US funds Foreign $26.00/1 year only US funds 

THIS CARD EXPIRES JULY 18, 1980 
PO BOX 981 

FARMINGDALE NY 11737 



microcomputing 



307B8 



"a trademark of Tandy Corporation 
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VERBATIM® ATHANA® GEORGIA MAGNETICS® 

Floppy Diskettes for 

ANY COMPUTER SYSTEM 



8 " Floppies only $3 

HU 

10 for $3.65 ea • 50 for S3. 40 



20 

ea. 

HUNDRED LOTS 



We reserve the right to ship either of the nam* brand s that we carry. 



5 % Mini-floppies only $2! 



,60 

• ea. 

HUNDRED LOTS 

10 for $3.10 ea. • 50 for $2.85 



SPECIFY SIZE, TYPE, & COMPUTER 

5% " Soft Sector, 10 Sector, 16 Sector— 8" IBM Compatible, Hard Sector 



CALL TOLL-FREE 24 HRS. TO ORDER 

800-824-7888 
OPERATOR 814 






Schools and 
unlvorsltlos 




VISA 



CALIFORNIA 800-852-7777 gi.d.y ..rv.c.d c.O.D 



DC SOFTWARE & COMPUTER PRODUCTS 
POST OFFICE BOX 503 
SAN BRUNO, CALIF. 94066 

FOR INFORMATION 415-348-2387 
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DISK DRIVE WOES? PRINTER INTERACTION? 
MEMORY LOSS? ERRATIC OPERATION? 
DON'T BLAME THE SOFTWARE! 





ISO-1 ^J ISO-2 

Power Line Spikes, Surges & Hash could be the culprit! 
Floppies, printers, memory & processor often interact! 
Our unique ISOLATORS eliminate equipment interaction 
AND curb damaging Power Line Spikes, Surges and Hash. 
'ISOLATOR (ISO-1 A) 3 filter isolated 3-prong sockets; 
integral Surge/Spike Suppression; 1 875 W Maximum load, 

1 KW load any socket $56.95 

'ISOLATOR (ISO-2) 2 filter isolated 3-prong socket banks; 

(6 sockets total); integral Spike/Surge Suppression ; 

1875 W Max load, 1 KW either bank $56.95 

•SUPER ISOLATOR (ISO-3), similar to ISO-1 A 

except double filtering & Suppression .... 
'ISOLATOR (ISO-4), similar to ISO-1 A except 

unit has 6 individually filtered sockets .... 
'ISOLATOR (ISO-5), similar to ISO-2 except 

unit has 3 socket banks, 9 sockets total . . . 
'CIRCUIT BREAKER, any modd (add-CB) Add 
•CKTBRKR/SWITCH/PILOTany model 

(-CBS) Add $14.00 

Mk PHONE ORDERS 1-617-655-1532 

Z±& Electronic Specialists, Inc. 



$85.95 

$96.95 

$79.95 
$ 7.00 



• 5« 



171 South Main Street. Natlck. Mast. 01760 



Dept.8M 
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15360 




PLUS 


63 






15423 


15424 












15487 


15488 












15551 


15552 












15615 


15616 












15679 


15680 












15743 


15744 












15807 


15808 












15871 


15872 












15935 


15936 












15999 


16000 












16063 


16064 












16127 


16128 












16191 


16192 












16255 


16256 












16319 


16320 












16383 


Position 


15360 


is the 


same as 


print 


ocation zero. 


Position 


15551 


is the 


last 


print 


position in the 


third row, etc. 














Table 2 


POKE chart. 





(14337) and then depress an "A" 
key, the variable X will have a 
value of 2. If the above PEEK 
statement is locked in a loop, 
the variable X will take on the 
PEEK value only during the key 
depression. With the A key de- 
pressed, X returns a decimal 
value of 2; with the key not 
depressed, X returns a decimal 
value of zero. Now if that doesn't 
forward-bias the LED above 
your head, keep reading. Keep 
reading anyway; we're not done. 

POKE 

First let's change the subject 
for a moment. The TRS-80 
graphics character consists of a 
block two bits wide by three bits 
deep. Each of these bits can be 
accessed and turned on by the 
set (X,Y) command and turned 
off by the reset (X,Y) command. 
This method is effective but ter- 
ribly slow. Fortunately, we have 
an alternative. We can POKE the 
graphics positions. Refer to 
Table 2, which shows you the 
POKE locations of all the print 
locations. POKE location 15360 
is the same as print location 
zero. 

As you can see, the chart is 
self-explanatory. If you know the 
print position you can find the 
POKE position. OK? So now we 
have established places to 
POKE, but what do we POKE? 
Time to move on again. 

Available Graphics 

Via the TRS-80, we have 
available a number of ASCII 
codes (129-191). If you examine 



these codes, you will see that 
they are different configura- 
tions of the 2 x 3 graphics block. 
To do the examining, the com- 
mand is PRINT CHR$ (X). If X 
equals one of the available 
graphics codes, you will see a 
graphics configuration dis- 
played. 

To see what is available, refer 
to Table 3, which shows the 
ASCII number and the corre- 
sponding display. An X refers to 
a bit turned on, and an O refers 
to a bit not on. For instance, a 
PRINT CHR$ (191) results in all 
six bits turning on. A PRINT 
CHR$ (149) results in the bits on 
the left side of the block being 
turned on. As you can see, we 
have lots of different configura- 
tions available for our use. 

Doing It 

Now that all the preliminaries 
are out of the way, let's get it 
working. Refer to the short pro- 
gram in Listing 1. While referring 
to this program, let's decipher 
each line and see what we have. 

Line 10 is easy; it's a standard 
clear screen command. Line 20 
sets the initial value of X to be 
used when we start POKEing. 
Table 2 shows that the location 
of the POKE is on the left side of 
the display about halfway down. 

In line 30 we ae assigning the 
value of PEEK (14337) to the vari- 
able named Y. In line 40 we set 
the stage for moving our paddle. 
The line starts with IF Y = 2 
THEN POKE X.128. The only 
time Y can equal 2 is during the 
depression of the A key on the 
keyboard. 



If Y does equal two then we 
POKE X. 128. The format for 
POKE (in my system) is POKE 
LOCATION, INFORMATION. The 
ASCII character code for a 
space is 128. After POKEing the 
space we increment the value of 
X by 64 (puts us one line down). 
The last portion of line 40 keeps 
the value of X within our video 
POKE positions; otherwise, we 
POKE into places we do not 
need to be, such as the program, 
the stack, etc. This causes all 
kinds of nasty crashes. Line 50 
decreases the value of X during 
a key depression, which pro- 
duces a Y value of 4, which hap- 
pens to be the B key. Line 60 
POKEs at our new X value the 
ASCII graphics code 149. Look- 
ing at Table 3, we find 149 to be 
all the bits on the left side of the 



graphics block. Line 70 loops us 
back to our PEEK statement at 
line 30. 

In a nutshell, what we are do- 
ing is quickly lighting a graphics 
position, erasing it and relight- 
ing it at the new location as is 
appropriate. If you have the pro- 
gram in your system, you will 
notice that when you depress 
the A or B key the paddle moves, 
and when you release the key 
the paddle stops. What we have 
is real-time interaction with our 
program with a single key de- 
pression. Use the keyboard 
table to pick where you want to 
PEEK. In the case of the UP, 
DOWN, LEFT and RIGHT com- 
mands, you may use several 
PEEK locations assigned dif- 
ferent variables— for instance, 
U = PEEK (14340). When the U 
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Table 3. Graphics chart. 



THE LOWEST 

prices on this high-quality software Buy direct and save 50 \ Now. also 
available for CBASIC on CP/M and MBASIC on HEATH HDOS 

DATA BASE MANAGER Modi $69 Mod-ll $199 

You can use it to maintain a data base & produce reports without any user 
programming. Define file parameters & report formats on-line Key 
random access, fast multi-key sort, field anth.. label, audit log. No time- 
consuming overlays 500 happy users in a year. Mod-ll version with over 
50 enhancements. 

A/R Modi $69 Mod-ll $149 

Invoices, statements, aging, sales analysis, credit checking, form input, 
order entry. As opposed to most other A/R. ours can be used by doctors, 
store managers, etc. 

WORD PROCESSOR Modi $49 Mod-ll $49 

Center, justification, page numbering Used for letters, manuals, and 
reports. Mod-I version features upper/lower case without hardware 
change! 

MAILING LIST Mod-I $59 Mod-ll $99 

The best 1 Compare and be selective. Form input. 5-digit selection code, zip 
code ext.. sort any field, multiple labels Who else offers a report writer? 

INVENTORY Mod-I $99 Mod-ll $149 

Fast, key random access. Reports include order info, performance 
summary. E.O.Q.. and user-specified reports. Many converted their 
inventory to ours! 

PAYROLL. A/R. A/P. and GL available for the Mod-ll DOS and CP/M 
L216. a cassette package of 10 business programs for Level II 16K 
systems, S59. 

All programs are on-line, interactive, random access, virtually bug free, 
documented and delivered on disks. Mod-I programs require 32KTRSD0S. 
and credit is allowed when you upgrade to Mod-ll. We challenge all 
software vendors to offer low cost manuals so you can compare and 
avoid those high-priced, undocumented, on-memory' programs 
Manuals alone So for Mod-I, S10 for Mod-ll Don't let our low prices fool 
you! 

Mod-ll programs are extensively modified, guaranteed to run with 1 year 
newsletter and updates. 10% off for ordering more than 1 Mod-ll program 

MICRO ARCHITECT. INC.. '" 

96 Dothan St.. Arlington. MA 02174 




TRS-80*— CONDENSE 

The Ultimata in BASIC 

Compression Utilitias .Au 

•• RiImm 1.3 Now Avillibli '• ^P 



Write BASIC programs using single statement lines for ease 
of maintenance. 

Write BASIC programs with unlimited remarks and comments 
to improve program readability and documentation 

— AND STILL GET — 
OPTIMUM USE OF MEMORY — FASTER PROGRAM 
EXECUTION 

Compresses programs up to 70% of original size 

Improves execution time by as much as 30% 

Creates multiple-statement program lines 

Blank compression 

Remark and comment deletion 

Renumbers GOTO. GOSUB. THEN. ELSE, and RESUME 

statements which reference deleted line numbers 

PLUS THESE NEW USER REQUESTED OPTIONS: 

- Retention of low numbered remark statements 

- Checkpoint / Restart Facilities 

- Phase 1 work file 



Modal I $21.95 

(Diskette) 



Modal II $24.95 

(Diskette) 



INTERNATIONAL SOFTWARE ASSOCIATES 
P.O. Box 14805 ^187 
Onaha. No. 68124 



Tandy Corporation* 



' Reider Service - see page 162 
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key is depressed on the key- 
board, your variable U returns a 
decimal 32. When the U is not 
depressed, you have a zero re- 
turned to your variable. 

In the case of an actual video 
display, use Table 2 to find the 
screen location and Table 3 to 
find your particular graphics 
character. Also— hadn't men- 
tioned it before— you can POKE 
any character, number, symbol 
or control code that you may 
desire by referring to the ap- 
propriate chart in your user's 
manual. 

New Thoughts 

Now that we have all that ac- 
complished, you can start writ- 
ing your ultimate game pro- 



10 


CLS 


20 


X=15808 


30 


Y=PEEK(14337) 


40 


IF Y=2 THEN POKE X,128 : X=X+64 : 




IF X > 16320 THEN X=16320 


50 


IF Y=4 THEN POKE X.128 : X=X-64 : 




IF X < 15360 THEN X = 15360 


60 


POKE X.149 


70 


GOTO 30 


80 


REM "A" FOR UP AND "B" FOR DOWN 




Listing 1. 



gram, either a video game as 
above or the ever-popular 
lander-type program. Use the 
above idea to enter fuel and 
direction during real time. The 
trouble with a lot of present 
lander games is that the pro- 
gram stops and allows you to 



think. With real-time entries you 
become a busy pilot. It will also 
be almost impossible to come 
up with a set routine to land your 
lander. How about running a dot 
through a maze? You could have 
an incrementing counter in your 
control loop that gives a relative 



time readout upon negotiating 
the maze. 

I put this article together to 
demonstrate a function that I 
find convenient. If you find it in- 
teresting, then I have accom- 
plished my goal. If you have also 
picked up some general PEEK, 
POKE and graphics information, 
then I have doubly succeeded. 

Conclusions 

Just remember to put your 
PEEK statement in a loop where 
it will be strobed. You can 
branch out when your statement 
is qualified and then return. 
When POKEing the video sec- 
tion, always put in an upper and 
lower POKE limit to keep from 
crashing through. ■ 
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GUITAR CORDS II • 

Has 1 1 8 chords that arc displayed with graphic, to teach the 
guitar. Chords can be added, deleted, changed, placed in any 
order, and be made to last for any length of time. Software 
directory said, (Here is a brilliant idea) and (one of the most 
practical ideal I have seen for personal computers). SI 9.95 

BARTENDER • 

84 recipes at your disposal. Pick a drink by name, or from 
a rotating list by just the touch of a key. Shows proper 
glass to use, with appealing graphics. Test them all and find 
your favorite, includes Pin* Colada. $14.95 

SIGNING • 

Learn to talk with the deaf and dumb. Type in any phrase 
up to 2,000 characters long. It then reads back one letter 
at a time, showing the hand positions for each letter. You 
have control over the speed, and whether or not the phrase 
shows on the screen, if so the letter being signed is high- 
lighted. S19.95 

FORMS • 
We also carry forms to aid in all your programming efforts, 
from documentation to POKEing and PEEKmg. You will 
be most imprtsted with our CRT map that is equal in si?e 
to your 12" CRT, on clear plastic. Write for catalog include 
S.A.S.E. 
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COVER YOUR INVESTMENT 



• Cloth Backed Naogahyo> ' 
I Improved fioltabili* 
1 longer 1 1 v 



• Wtterp'oo' & Duttproot 

• Three Decorator Colors 

Saddle Tan • Eiectra Blue ■ Black 



Stud check ar money order to 

Inclufli H 00 for posliqi and handling 

Ovenei. order? include 13 00 pottage 

DEALER INQUIRES INVITED 



CotvuCouEf. 

P I) Bo» 3?4 lOfpt Ci 
Mary rather FL 3£*9 
Phone <904i ?43 b/93 
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EDUCATIONAL 

SOFTWARE 

TRS-80* 

80 + Programs In: 



ELEMENTARY 

SCIENCE 

GEOGRAPHY 

ECONOMICS 

FOREIGN LANG. 

GAMES 



MATH 
BIOLOGY 
HISTORY 
ACCOUNTING 
BUSINESS ED. 
MAILING LABELS 



Programs are grouped Into packages of 
4 to 7 programs priced at $14.95 per 
| package Including shipping and han- 
| dllng. Available on disk or tape. 

Write for catalog: ^ 89 

MICRO LEARNINGWARE, BOX 2 1 34, 
,. MANKATO MN 56001 , 507 625 2 20? 
"TRS-80 is • registered trademark of TANDY CORP.' 



MAXELL® 

OR SCOTCH" BRAND DISKS 

Some computerists pay less but may not get 
Shuggarf or IBM" approved disks. 

8" SINGLE SIDE • DOUBLE DENSITY 

Box of 10 FOR $50.00 

8" DOUBLE SIDE • DOUBLE DENSITY 

Box of 10 FOR $65.00 

5V«" MINI — Box of 10 FOR $40.00 



tf&fiDYSAN DISKS 

**' ****** 

5'V Mini • Box of 5 for $25.00 




COD $1.00 Additional Specify (8" - 

Soft or Hard Sector) (5 "Soft or Hard Sector) 

CUSTOM ^121 
ELECTRONICS INC. 

238 EXCHANGE STREET 
CHICOPEE, MASS. 01013 
est 1960 1—413—592-4761 

HOURS: Tues. to Sat. — 9 to 5 

ATARI* • •Tlf»0.4»MATKLL 
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1721 Greenlea Drive 
Clearwater, Florida 33515 
Tel (813)446-6283 
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SOFTWARE - TRS-80 - SOFTWARE 




PACKAGE ONE INCLUDES: GRAPHIC- 
TREK "2000" - This lull graphics, real 
lime game Is lull of last, exciting action! 
Exploding photon torpedoes and phasers 
till the screen! You must actually navigate 
the enterprise to dock with the giant space 
stations as well as to avoid klingon 
torpedoes! Has shields, galactic memory 
readout, damage reports, long range 
sensors, etc! Has 3 levels lor beginning 
average, or expert players' * INVASION 
WORG Time: 3099. Place. Earth's Solar 
System Mission: As general of Earth's 
forces, your job is to stop the Worg 
Invasion and destroy their outposts on 
Mars, Venus, Saturn. Neptune, etc! Earth's 
Forces: Androids - Space Fighters - 
Lazer Cannon - Neutrino Blasters! Worg 
Forces: Robots — Saucers - Disintegrators 

- Proton Destroyers! Multi level game lets 
you advance to a more complicated game 
as you get better! * STAR WARS 
Manuever your space lighter deep into the 
nucleus of the Death Star! Drop your 
bomb, then escape via the only exit. This 
graphics game is really fun! May the Force 
be with you' * SPACE TARGET 
Shoot at enemy Ships with your missiles. 
If they eject in a parachute, capture them 

— or if you're cruel, destroy them! Full 
graphics, real time game! * SAUCERS 
This fast action graphics game has a time 
limit! Can you be the commander to win 
the distinguished cross! Requires split 
second timing to win! Watch out' 

ONLY $12.95 




PACKAGE TWO INCLUDES: CHECK- 
ERS 2.1 — Finally! A checkers program 
that will challenge everyone' Expert as 
well as amateur! Uses 3-ply tree search to 
find best possible move. Picks randomly 
between equal moves to assure you of 
never having identical games. * POKER 
FACE The computer uses psychology as 
well as logic to try and beat you at poker. 
Cards are displayed using TRS-80's full 
graphics. Computer raises, calls, and 
sometimes even folds! Great practice for 
your Saturday night poker match! (Plays 5 
card draw). * PSYCHIC — Tell the 
computer a little about yourself and he'll 
predict things about you, you won't 
believe! A real mind bander! Great 
amusement for parties. * TANGLE MAN- 
IA — Try and force your opponent into an 
immobile position. 8ut watch out, they're 
doing the same to you! This graphics game 
is for 2 people and has been used to end 
stupid arguments. (And occasionally starts 
them!) * WORD SCRAMBLE — This 
game is for two or more people. One 
person inputs a word to the computer 
while the others look away. The computer 
scrambles the word, then keeps track of 
wrong guesses. 



ONLY $12 95 




PACKAGE THREE INCLUDES: POE- 
TRY This program lets you choose the 
subject as well as the mood of the poem 
you want. You give TRS-80 certain nouns 
or names, then the mood, and it does the 
res'' It has a 1000-word • vocabulary of 
nouns, verbs, adiectives and adverbs! * 
ELECTRIC ARTIST - Manual: draw, 
erase, move as well as, Auto: draw, erase 
and move. Uses graphics bits not bytes. 
Saves drawing on tape or disk! * GALAC- 
TIC BATTLE — The Swineus enemy have 
long range phasers but cannot travel at 
warp speed' You can, but only have short 
range phasers! Can you blitzkrieg the 
enemy without getting destroyed! Full 
graphics - real time! * WORD MANIA 
Can you guess the computer's words using 
your human intuitive and logical abilities' 
You'll need to, to beat the computer! * 
AIR COMMAND - Battle the Kamikaze 
pilots. Requires split second timing. This is 
a FAST action arcade game. 



ONLY $12 95 




PACKAGE FOUR INCLUDES: LIFE 

This Z-80 machine language program uses 
full graphics! Over 100 generations per 
minute make it truly animated! You make 
your starting pattern, the computer does 
the rest! Program can be stopped and 
changes made! Watch it grow! * SPACE 
LANDER - This full graphics simulator 
lets you pick what planet, asteroid or 
moon you wish to land on' Has 3 skill 
levels that make it fun for everyone. * 
GREED II - Multi-level game is fun and 
challenging! Beat the computer at this dice 
game using your knowledge of odds and 
luck! Computer keep; track of his 
winnings and yours. Quick fast action. 
This game is not easy! * THE PHARAOH 
Rule the ancient city of Alexandria' 
Buy or sell land. Keep your people from 
revolting! Stop the rampaging rats. Re- 
quires a true political personality to 
become good! * ROBOT HUNTER - A 
group of renegade robots have escaped and 
are spotted in an old ghost town on Mars! 
Your job as "Robot Hunter" is to destroy 
the pirate machines before they kill any 
more settlers! Exciting! Challenging! Full 
graphics! 



ONLY $12.95 



HARDWARE - TRS-80 - HARDWARE 
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PACKAGE FIVE INCLUDES: SUPER 
HORSERACE — Make your bets just like 
at the real racetrack! 8 horses race in this 
spectacular graphic display! UP to 9 
people can play! Uses real odds but has 
that element of chance you see in real lite! 
Keeps track of everyone's winnings and 
losses. This is one of the few computer 
simulations that can actually get a room of 
people cheering' # MAZE MOUSE — The 
mouse with a mind! The computer 
generates random mazes of whatever size 
you specify, then searches for a way out! 
The second time, he'll always go fastest 
route! A true display of artificial intelli- 
gence! Full graphics, mazes & mouses! * 
AMOEBA KILLER — You command a 
one man submarine that has been 
shrunken to the size of bacteria In this 
exciting graphic adventure! Injected into 
the president's bloodstream, your mission 
is to destroy the deadly amoeba infection 
ravaging his body! * LOGIC — This 
popular game is based on Mastermind but 
utilizes tactics that make It more exciting 
and challenging — has 2 levels of play to 
make it fun for everyone. * SUBMARIN- 
ER — Shoot torpedoes at the enemy ships 
to get points. Fast action graphics, arcade 
type game is exciting and fun for 
everybody! 

ONLY $12.95 



MICRO 
SPEED 

Upgrade your "slow" TRS-80 to a 
SUPER FAST MACHINE!! (2.66 
MHZ) over 50% FASTER! Some of 
the features: 

Auto turn-off during cassette or 
disk access. (This means NO lost 
programs EVER!) (Turns back on 
automatically too!) MANUAL con- 
trol. (Unit may be turned on or off 
at any time. Yes even during 
program execution!) Keyboard 
indicator light "blinks" when mi- 
cro-speed is on. Stops blinking 
when off! Don't wait for SARGON 
II or any other program!!! Comes 
with easy to follow instructions. 
(Some soldering required.) OR take 
to your local computer store or 
TV-Appliance Center for quick 
installation. (5-10 minutes!!) Works 
with any model, TRS-80. 

ONLY $24.95 complete 



MICRO 
BEEP 

Simple hook up: Just plug cassette 
remote lack into unit. 



EASILY CONTROLLED FROM 
BASIC: 

OUT 255,4 = on 
OUT 255.0 = off 

MICRO-BEEP make games more 
fun as well as provide useful sound 
output for professional applica- 
tions! 

Works with Any Model I TRS-80 




PACKAGE SEVEN INCLUDES: BACK- 
GAMMON 5.0 — 2 different skill levels 
make this game a challenge to average or 
advanced players FAST (15 second avg) 
Looks for best possible move to beat you! 
FANTASTIC GRAPHICS. Plays doubles 
and uses International rules * SPEED 
READING — Increases your reading 
speed. Also checks for comprehension of 
material. Great for teenagers and adults to 
improve reading skills * pt 109 — Drop 
depth charges on moving subs. Lower 
depths get higher points m this fast action 
graphics game. * YAHTZEE — Play Yaht- 
zee with the computer. This popular game 
is even more fun and challenging against a 
TRS-80! * WALL STREET - Can you 
turn your $50-000 into a million dollars? 
That's the object of this great game 
Simulates an actual stock market! 

ONLY $12.95 



ONLY $9.95 complete 



PACKAGE SIX INCLUDES: 20 HOME 
FINANCIAL PROGRAMS Figures am- 
ortization, annuities, description rates, 
interest tables, earned interest on savings 
and much, much more. These programs 
will get used again and again. A must for 
the conscientious, inflation minded per- 
son. 

ONLY $12.95 




^19 



Exceptional Products through Research 8t Imagination 
Send Check, Money Order or Bank Card No. orders to: 



SIMUTEK 
P.O. Box 35298 
Tucson, AZ 85740 



Please Add 2.50 

Per Order For 

Postage & Handling 



24 HOUR (7 days) HOTLINE 
Master (602 ) 882-3948 

Charge (C.O.D.$3extra) 

Same Day Shipment on Bank Cards, 
Money Orders & C.O.D. 

All Tape Programs Require a Minimum of 16K Level 2 

Packages Available on Diskette (32K System) S4.25 Extra 

3 or More Packages Get 10% Discount 

Dealer Inquiries Invited 
TRS-80 IS A REGISTERED TRADEMARK OF TANDY CORP. 



Visa 



■ Reader Service — see page 162 
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UTILITY 



If you don't know your FF from 
your 00 then try this program for size 

Hex Display 



iee GOSl*378 

U8 N M Cn 0=16 H=48 

129 F«I=1T018 IFB>*Weaii!a!6A5»C€-:260(«V?5««e<Ui«'lNTh.B. IFfc3lfW*:4:WNTfi.& 

138 IFB,27AN0e<350RB>123»«kl*HnNTA. 6. " '. CHRKB; . 
148 A=ft*l B=8*l NEXT 

159 F0RMT06 Kll=C«t(H. K2*=0*S<64*C.' IFfc9*JC*a6£iR6>:5«ND8<320re>95fK>B<129P«INT" 

Hi*,H2t, " '.0. IF6>41AND8<48PRINT" *, H1*,H2 $,D. 

169 IFB>27AND8<950RB>128FK>6<132PR1NT" ".H1$.K2*. " ".0." ".OUCD), 

179 C=C*1 0=0*1 NEXT 

199 B=B*t C=l K***l 00*18 

139 IFHU= , 2"ANDK2**"F , G0SU6368 
299 IFWM'S-flHjHZ^'F'GOSUB:** 
218 IFHlM - 8"HNDH2i="F"(J0SlJe368 
2»«-«-:*=*9-Pie»C»=-F-G0TCE4e 

238 G0T0129 

249 0=169 E=l H=48 K=178 J=65 

259 IFD>131G0SUB368 G0T0299 

268 F0B1=1T018 HIKHRICJ; H2t=0**H> FVIHT" *.H1*,K2$. " \D." '.CHR»(D>. 

[><>*1 n=+*l NEXT 
278 F0R1=1T06 HLKKtlU) H2**Ct«l<64*E; PRINT" 

E*E*1 K-M NEXT 

289 J=J*1 H=H-19 0*0*6 E=l K=*+18 

285 G0T0259 

239 F0RI=1T019 W*=CHR*<J> H2t=CW»<H) PRINT" " 
399 F0RMT06 HU<HRIU) H2**CHR*64*E) PRINT" 
318 J=J*1 IHMB 0*0+6 E=l K=K*18 
328 IFWt="8"PieH2$= , F - G0a*369 
339 IfH»="E"ANDH2$="F"G0SUB368 
349 IFtti»="F"ANDK2*="F"G0T0389 
339GQT0239 

369 PRINT PRINTTAB<29)'WA1T FOR MORE* F0RMT01898 NEXT 
379 CLS PRINT" VHV V&V ■.•ASCHMflKWH*, • V 
TAB(33)"H\" ", ■O'.* ","RSCir.TR8(49) , HV ". 
■D-." -,-«SCII" RETURN 
389 PRINTTAB(29)"Ett Of DISPLAY' END 

H ASCII H ASCII - ASCII H [> ASCII 



•,H1$.K2$." ".K," ".CHRI'K), 



,m.».H2t. ■ 

".W.I.H2I. 



D. 0=0*1 H=H*1 NEXT 
■lit E=E+1 R*«4 NEXT 
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Dr. H. J. Campbell 
Institute of Psychiatry 
De Crespigny Park 
London SE5 8AF 



The speed of many micro 
applications could be im- 
proved by rapid and accurate 
hexadecimal conversions of 
decimals 0-255. 

Assembly language program- 
ming is tedious without this fa- 
cility and modifying byte data in 
main memory or disk sectors 
can be highly dangerous. 

Although converting numbers 
in this range with a pencil and 
paper is not difficult when done 
as an exercise, it is a source of 
distraction and prone to error 
when carried out while program- 
ming or doing surgery on data 
registers. Yet there appears to 
be no software available specifi- 
cally designed for this purpose. 

Display ASCII as Well 

The program Hexadecimal 
Display, written here in Level II 
BASIC, displays not only hex 
conversions but also the ASCII 
characters and the TRS-80 
graphics characters. The latter, 
of course, appear only as peri- 
ods in the printed RUN. 

Hexadecimals composed on- 
ly of numbers can be displayed 
by using the simple variables A 
and B. Since variables con- 
sisting of a combination of let- 
ters and numbers cannot be as- 
signed or called directly, it is 
necessary to introduce two 
modifications to the simple A-B 
scheme. 



Firstly, the calls for all num- 
ber hexadecimals must be made 
to leapfrog over the alphanu- 
meric ones. This is done with the 
Boolean logic of line 120. having 
initialized the variables in line 
110. 

Secondly, to call the alphanu- 
meric hexadecimals the vari- 
ables are first assigned to 
strings and these are then 
equated with appropriate CHR$ 
functions. This can be seen in 
lines 50, 260, 270, 290 and 300. 

The logic in line 150 ensures 
correct spacing in the display. 
Here, as in all the PRINT lines, 
meticulous care must be taken 
with punctuation. Throughout. 
CHR$(H) provides the hexadeci- 
mal number byte and CHR$(64 
+ C) or CHR$(64 + E) estab- 
lishes the appropriate letter 
byte. 

Calling the ASCII and graph- 
ics characters cannot be done 
as a continuous series because 
many of them are control codes, 
which execute following a 
PRINT statement. For example, 
a simple request such as 

FOR I = TO 255 PRINT CHRS<I) NEXT 

will founder in several places. 
The worst, perhaps, is when 
CHR$(23) is reached. This im- 
mediately converts all subse- 
quent display to 32-character 
format. 

Higher codes will do other un- 
acceptable things such as clear- 
ing the screen and compressing 
in tabular fashion. Still, this 
problem is easily overcome by 
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Dfck-drive Extender Cables 




FITS ALL MIXI-IHSK DRIVES 

VISTA • MICROPOLIS • MT1 • PERTEC 
SHUG ART • PERCOM • AND OTHERS 

May alio t>» m«l to interface th» R/S Mod II printer out port to a 
tlarula'd C«nttonict cabla ronnai l.n - aliminatan tha naad «0« • 



apeoal prlntai »Mt 



GOLD PLATED 
CONTACTS 



34 PIN MALE 
CONNECTOR 



FULL 9 INCH 

COMPLETE ASSEMBLY 

THROUGHLY TESTED 



28 GAGE 34 CONDUCTOR 

STRANDED COMPUTER GRADE 

FLAT RIBBON CABLE 



2 PIECE HIGH IMPACT 
MOLDED PLASTIC 



GET ONI! FOR F.ACH DRIVE 



END THE HASSLE I 

ELIMINATES SHORT CIRCUITS FROM 

* PINCHED AND WORN CABLES 
ELIMINATES FUMBLING OR DROPPING 

* A DRIVE WHILE MOVING THEM 
ELIMINATES DISASSEMBLY OF DRIVES 
TO REMOVE A DRIVE FROM THE SYSTEM 

A ELIMINATES TANGLED. TWISTEO. 
KINKED AND WORN SYSTEM CABLES 

ELIMINATES DISASSEMBLY OF DRIVE 

* CABINETS TO INSTALL CABLES 

ELIMINATE THE HEADACHES 

* GET ONE FOR EACH DRIVE UNIT 




r 



sum 



$16.95 

LACH 

I'llsliN \|. TAXES 
SIIIPHIM. ft HAXIM IM 



EASY TO INSTALL: 

Rvasove drivr <ov»i; 
r«|>*ac« co»»i 



2 PIECE HIGH IMPACT, 
MOLDED PLASTIC 



GOLD PLATED 
CONTACTS 



34 PIN FEMALE 
CONNECTOR 



cabla-: 

. . . DONE ! 



□ 



O 
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IJG COMPUTER SERVICES 



569 NORTH MOUNTAIN AVE. SUITE B 
UPLAND. CALIFORNIA 91 786 USA 



UP TO 30 /O OFF AND 

IMMEDIATE DELIVERY 

TRS 80™ $3626. 00 

MODEL II 64K 



IN-STOCK 
FULLY GUARANTEED 



ORDER NOW (1) 800-345-8102 



DISK DRIVES $350.00 

OVER $149.00 LESS THAN RADIO SMACK 

Fully compatible with Radio Shack's operating system 
TRSDOS™ and drives. Just plug in and runl 

• One. two. three or four drive configurations. 1 02k to 
408k bytes. 

• All systems include a patch program to upgrade your 
TRSDOS™ to 40 tracks. 

• Cases are furnished in gray to match your system. 



ORDER NOW (1) 800-345-8102 



TMtO 4 K LfVfl I »YiTEM 
TMt-M 4 It LIVf L II tVtTCM 
Tat-40 II K LEVEL II tVlTEM 

t xm mOH MTDVAca iO<* 

TELEPHONE MOOCM 



1 1ST OUA 

PRICE MICE 

M99 00 MM 10 

MI9 00 Mrl.ra 

H49 0C 1749*0 

1299 00 MTilO 

tl(900 lit* M 



CENTRONIC* TJ0 
CENTRONICS '1! 

• IMC'I 

• LETTER OUALITY DOT MATW1 

• TRUE DESCENDER* 

MC MINWRITEa 5610 IwHUTmcMn) 1194 00 



LIST OUR 
PRICE PRICE 

IW.00 IMttt 



V R DATA CORPORATION 
777 HENDERSON BOULEVARD N-6 

FOLCROFT INDUSTRIAL PARK 
FOLCROFT. PA. 19032 (215) 461-5300 



■V R DATA'S TRS-80™ 
SWEEPSTAKES I 

Celebrating V. R. DATA'S 8th Anniversary 

OVER $1700.00 in PRIZES 
GRAND PRIZE - 16K Lll TRS-80 
TWO SECOND PRIZES - DISK DRIVES 

FOUR THIRD PRIZES - $ 50. 00 Gift Certificates 
SWEEPSTAKES RULES 

1 ALL ENTRIES MUST BE SUBMITTED ON ORIGINAL 
ENTRY BLANK. 

2. ONE ENTRY PER PERSON 

3. WINNERS SELECTED BY RANDOM DRAWING. 
NOTIFIED BY MAIL 

4. ENTRIES MUST BE RECEIVED BY 10/31/80. 

5. VOID WHERE PROHIBITED BY LAW. NO 
PURCHASE NECESSARY. 



MAIL NOW TO ENTER V. R. DATA'S SWEEPSTAKES 



NAME 

ADDRESS 
CITY 



STATE 



ZIP 



TELEPHONE 

COMPUTER EQUIPMENT OWNED 



.OCCUPATION 



INTENDED USE 



M 



SEND FOR CATALOG D 
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incorporating leapfrogging log- 
ic into the lines that display the 
CHR$ equivalent of the decimal 
variable, viz. lines 130, 160, 250, 
260 and 270. 

Hexadecimal Categories 

This set of hexadecimals 
comprises several groups that 
fall into two categories. One 
category is the groups in which 
the first byte runs from A to F; 
the other category has the num- 
bers 0-9 as the first byte. Each 
of these categories requires a 
distinct FORNEXT loop, 1 to 6 
and 1 to 10 respectively (see 
lines 150. 270, 300 for the first 
category; 120, 260, 290 for the 
second category). 

The values of the variables 
within each loop are changed by 
the accumulator assignments in 
lines 140, 170, 260, 270, 290 and 
300. 

Since each FORNEXT loop 
assigns its own set of values to 
the variables, these must be re- 
set correctly for the looping that 
follows the GOTO statements in 
lines 230 and 250. Resetting is 
done in lines 180, 280 and 310. 

When the first hexadecimal 
byte is a letter (decimal 160) and 
when both bytes are letters (dec- 
imal 170) variable values must 
be reassigned. Line 240 accom- 
plishes this. The pointer is sent 
here when 9FH is reached (line 
220). 

As listed, the program scrolls 
page-size displays with pauses 



between each page. Interim 
pages carry the message WAIT 
FOR MORE and the last page 
contains the information END 
OF DISPLAY. These break 
points cannot, of course, occur 
within FORNEXT loops, so lines 
190-210 and 320-330 call the 
delay subroutine in line 360 
(which may be user-modified to 
alter the length of the delay peri- 
od). 

When FFH is reached, line 
340 sends the pointer to the final 
message and END of the pro- 
gram in line 380. 

Headings for the columns are 
provided by the subroutine in 
line 370, which is called at the 
beginning (line 100) and which 
follows the various GOSUB, to 
line 360. 

The program responds to 
BREAK at any time and the RUN 
may be printed in whole or in 
part by using the JKL screen 
printer of NEWDOS + . In the 
absence of this facility or if hard 
copy is desired, obviously the 
PRINT statements should be 
changed to LPRINTS. 

Deliberate compression of 
the program by avoiding spaces 
and REMs produces a memory 
requirement of only 1.1 K. Thus 
the program can usually be 
SAVEd on most disks where 
surgery is to be carried out, pro- 
viding an in situ source of hexa- 
decimals which, unlike print- 
outs, cannot become buried 
under other papers. ■ 
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Program Listing 







EDUCATIONAL SOFTWAR 

Level II— Min 4K 

[ALPHA For ages 4-7— teaches 
alphabet recognition; 
Reinforcement— a "happy"| 
face 

ISIGMA For Grades 1-3— A random I 
series of one-digit addition| 
problems (i.e. 4 + 5 = 9) 
Reinforcement— Push the 
puck through the goal 

I Simple to use— No depressing the ENTER| 

I key 

Each $5.95— Both for $10.00 



Mercer Systems Inc. 

87 Scooter Lane 

Hicksvllle. N.Y. 11801 



TRS80 CLEVEL U 
and 



Disk c FVograms 



MUlTim IEGIESSION 2.0 A disk ImvM package of 
chained programs that permits model estimation using 
thousands o( observations, user specified transform* 
lions (write them in BASIC during execution). X Y plots, 
formatted for screen or printer ♦ all features of Multi 
pie Regression I $45 00 

UVUR I6K raoc«AMS 
Multiple Regression I $29 05 

Linear Programming $29 l >5 

I Programming $29 95 

Transportation Algorithm . $29 95 

Heuristic Line Balancing $29 95 

Stat Pack- medium mode mean (avg . harmonic, 
geometric) variance histograms. Tests (T.XVF.) one 
variable regression, one and two way ANOVA $9 95 
Differential equations- o methods $29 95 

Queuing Statistics $14 95 

LOWIICASt MOD- Includes e»cellent documentation 
♦ all parts (nothing else to buy), compatible with llec 

trie Pencil $ 14 95 



• 269 



Q 



uont 



»••*•» • tot «« U 

: ■!■**• M« I". *r -ii 



p.o. box 628 

Charleston sc 

29402 



f 



..... SECURITY CONTROL CENTER • ' 

You con control light when you re not. ot home, at random 
times. Turn video o< recording equipment opplionce bell 
loud alarm device on and off at preset times, even months 
odvonce. * Comes with program, control module ond oc 
odoptor* '< $29.30)* 

• • • AUTOMATIC TELEPHONE DIALER • * • 
You can dial telephone automatically 300 or more. Even If 
you forgot telephone number, if you remember port of It. 
you con find the number through search command 
* Comes with progrom. control module ond oc adaptor 

• *( $29.30)* 



1 



60-DEEP 

To be used to signol the end of long sort and signal you In 

case of looding error. It also lets you know with one beep. 

two beeps, etc. Exoctly whot port of the progrom you ore in. 

* Comes with instruction, control module ond oc odoptor 

•($29.30)* _ 
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COMPUTER 

PIRATES 

.OflTfl 
THIEVE 

ARE HERE... 

Don't let computer pirates: DIVINE your DATA 

FILCHE your FILES 
PERUSE your PROGRAMS 

Protect them all with CRYPTEXT, the hardware 
encryption module that brings ultra-high level 
security to the small computer user. Once 
encrypted, your files can be stored or trans- 
mitted in strictest privacy. A single CRYPTEXT 
unit will differentially control the medical, 
legal or financial records, mailing lists, and 
design data for an entire firm. 
Breaking CRYPTEXT encrypted data is like un- 
scrambling an egg. We don't say its impossible 
but we have 3 oz. of fine gold waiting for the 
first person who succeeds in breaking our test 
message . 
SECURITY SYSTEMS FOR USE WITH : 

NORTHSTAR 



TRS-80 



APPLE II 



SUPERB RAIN 




a«ypTi©<r 



R&IM4N 

iMtlk, W Mill <*o«> >+*-•*•« 



ADVANCED BUSINESS 
SOFTWARE FOR THE TRS-80 

(Now Available For Model II Abo) 
* FORECASTING * RISK ANALYSIS * U.S. MACRO MODEL 

If you're serious aboul improving your business 
with a computer, why not use the best business planning software 
available? Or David M Chereb has made the most powerful and 
successful business analytical techniques available to micro 
computer users 

All programs listed below are in Basic, for 32K (or morel disk 
based TRS 80 systems 

BUSINESS PLANNING PACKAGE for FORE- 
CASTING An integrated set of forecasting programs 
to handle a variety of business forecasting needs 
from Trend Analysis to Advanced Multiple Regies 
sion (100 pg. User Manual) $99 
INVESTMENT RISK ANALYSIS The maior ingred- 
ient in any investment is uncertainty This 
program accounts lor cost changes, shifting 
revenue streams and interest rate fluctuations 
Now you can manage risk (35 pg User Manual) 
$99 
U.S. SIMULATION MODEL Knowing where the 
economy is going and how it reacts to government 
fiscal and monetary actions can save you a lot of 
money This is a user onented economic situation 
model constructed to professional standards (50 
pg User Manual) $199 
NOTICE TO CUSTOMERS: 
Because of the tremendous increase in recent 
orders, our shipping response time has slowed We 
are expanding in order to correct this situation But 
for the next month our shipping date will average one 
week after receipt of your order 

To order CALL 213/424 3652. or write to APPLIED ECONOMIC 
ANALYSIS. 4005 Locust Ave.. Long Beach. CA 90807 

^*7 



Sirius Systems introduces lower 
prices to quality drives! « 




Remex RFD 4000/8 
Floppy Disc Drive 
Double trie storage! 
Double sided . . . 
Double density!! 

549" 

Offers quality and features found in drives costing 
much more' ■ Single or Double Density ■ Double Sided Drive ■ Door 
Lock INCLUDED ■ Write Protect INCLUDED ■ 180 Day Warranty 
■ Compatible with Shugart 850/851 ■ Low Power Operation ensures 
LONGER LIFE" ■ Model RFD 4001 offers Data and Sector Separator 

AVAJLAilf OPTIOWS. ACCESSORIES 

r ] Dual Dove Power Supply n S*>Q*e Dnve Power Supply and Cabin* $119 95 

' andCab.net $139 95 Q Interface Manual $2 95 

□ RFD 4000 Manual $5 95 Q Drive Cabinet. $29 95 ; , RFD 4001 S564 95 

MPI-51/52 

A Great 
Reliable 
Mini -Drive! 

• fast' 5ms *ac* 
to ft at* access 

• faotawtPu** 
Sand Design 

• UrmjutOoottf /ector MecAensm 

• Aeeeofc / S % Speed Safety 



SIRIUS Wpta: 

The Perfect 
Add-On lor 
your TRS 80* 

• Comes conajMt 

•.'.„•» I aftjj k) 

and run' 

• Vrw rrac* u trxt 

smiusao.i *£«* 

SIRIUSM*} iDuaiMead) $419.95 




rns 



t. 




MPisi eOCQ95 

(Single Head) yfcjif 

Mfttt (Dual Head! $349.95 



Remex 1000B 
If you've been looking for a 
less expensive floppy disc 
drive, but not wanting to 
sacrifice quality — 
your search is over! 

41 9 95 




VtXUMf 

OtSCOUNTS »V»H ABi ( 



You get both in the Remex 10008' For only $419 95 look at what you get 
8 Floppy Drive ■ Single or Double Density ■ Hard or Soft Sectoring ■ 
Media Protection Feature ■ Single Density Data Separator ■ 180 Day 
Factory Warranty 

avau abi r oenoN&v ACCESSORIES 

[JOoorUX* $1995 [J Dual Drive PovierSupply $91 95 J Interface Manual $2 95 
Q Wnte-Protect $19 95 Q Sing* Onve Power Supply $69 95 □ interface Adapier $12 95 
I - ] Connectors $9 95 Q Drive Cabinet $24 95 iRemei to Shugart) 



(5 



SIRIUS 
SYSTEMS 

^67 



P Boi 9748 Kno«viH» TN 37920 

Phone Oiden accepted 9AM 7PM if S T i (6151 693 6583 

• ; Check \ ; Money r>d«i ' jC D M<: MM ai 



vror 



Gwo-r 



A&OftfSS 



CrTv - 



fiPlRA'irs"!*7T 



STaTT 7TP— ttBGHOiKftssiGaiATuM 

Add $7 00 per Onve to« Shopmg'Handting Trnnesse* resident! add 6N %ai« ta» Foreign ordeu 
add 10^ ipavment «US currency onlyi 
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REVIEW 



Six programs from four companies, 

find out the bottom line as Rod Hallen sees it 



Applications Software 



Rod Hallen 

State Department-Accra 

Washington, D.C. 20520 



By looking at documenta- 
tion, ease of loading, diffi- 
culty of use and suitability, I will 
attempt to help the potential 
buyer decide whether the pro- 
grams discussed will be useful 
to him. At the same time, please 
keep in mind that your require- 
ments and desires may be dif- 
ferent than mine and that what 
appeals to me may turn you off 
and vice versa. 

The Software 

Vendor: Micro Architect, 96 
Dothan Street, Arlington MA 
02174 

Name: WORD-1 

Purpose: General-purpose word- 
processing system 
Documentation: Four pages— 
well-written 
Loading: OK— Level 7 
Implementation: Requires a 
printer to be of any practical 
value. Also, the TRS-80 should 
be modified for lowercase. User 
should have some BASIC pro- 



gramming background since 
text is entered into the system 
as data statements. This is more 
difficult than the method used in 
most word processing systems, 
but they cost at least four times 
as much as WORD-1 . Also, since 
this is written in BASIC rather 
than machine language, it is 
quite slow. 

Suitability: This Is not for the 
author or others with high- 
volume requirements. It is, 
however, quite suitable for the 
letter writer or for someone who 
needs many copies of the same 
letter with a different name and 
address on each one. I like word 
processors because they allow 
me to correct all of my mistakes 
without being committed to 
paper. 

Vendor Micro Architect 
Name: BANK-1 

Purpose: Personal checkbook 
accounting system 
Documentation: One page- 
sufficient, mostly self-docu- 
menting 

Loading: OK— Level 7 
Implementation: No hardware 
requirements except the stan- 
dard cassette recorder. This pro- 
gram will process and store 100 
checks in a 4K machine and 
1600 checks if you have 16K. 
Data is input from the keyboard 
and includes check number, 



amount and transaction code. 
Each check is put into one of a 
number of categories depend- 
ing upon the transaction code. 
All checks can be recalled, 
changed or deleted, and a sum- 
mary report can be displayed at 
any time. The summary breaks 
expenses down into categories 
with totals for each one. All 
check data is stored on cassette 
for future use. 

Suitability: A simple but effec- 
tive personal accounting system. 
Should be all that most house- 
holds will need. Since it is writ- 
ten in BASIC, the names of cate- 
gories can easily be changed to 
suit your situation. I have al- 
ready entered all of last year's 
checks into its data base. 

Vendor Micro Architect 
Name: STOCK-1 
Purpose: To keep track of the 
value of your stock portfolio 
Documentation: One page— 
sufficent, self-documenting 
Loading: OK— Level 7 
Implementation: Program 
comes loaded with sample 
stocks so that the user can get 
an idea of what to expect. For 
your own stocks, you enter the 
date, original price, number of 
shares and current dividend. 
The program then computes 
your current worth by asking for 
the latest price for each of your 



stocks. It also figures in the pre- 
sent value of your house. As in 
WORD-1, all data is input as 
data statements rather than as 
a response to an input state- 
ment. It is also awkward to use if 
you have blocks of the same 
stock that were purchased at 
different times or for different 
prices. Each block must be input 
as a separate stock entry. Data 
is stored on cassette as part of 
the program which is resaved 
anytime that changes are made. 
Suitability: The speculator will 
want something more sophis- 
ticated than this. For the user 
who buys and holds his stocks 
for a reasonable period of time, 
this program will compute his 
net worth and gain or loss posi- 
tion. It will not analyze future 
stock possibilities. 

Other software available from 
Micro Architect: Cassette Data 
Base Manager, Inventory Man- 
agement, Mailing List System, 
Sorting Utility, Key-access Utili- 
ty, Statistics Package, Sales 
Analysis and many more. 

Vendor M, M and S Computer 
Software. 16 Marylyn Lane, 
Westbury NY 11590 
Name: Statistical Package 
Purpose: Designed to compute 
and display mean, variance and 
standard deviation, linear cor- 
relation coefficient, T-test, anal- 
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CHEAP BOOKKEEPER 



A GENERAL LEDGER SYSTEM 



See to Believe 

Sold by Sturdivant and Dunn, Inc. for Radio Shack TRS-80* 
Model I Level II 32 or 48 K systems with 2 drives and at least 

an 80 character per line printer. 

Send $1.00 for information and sample printouts (14 pages) 
to Sturdivant and Dunn, Inc., Box 277, Conway, NH 03818. 

*** Price is $175.00. 

TRS-80 is a Trademark of Radio Shack, a Division of Tandy corporation. 
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FOOTBALL 

ft TRS-80* 

Now you can play football al home on your Level I 4K 
TRSSO' You and your opponent plan strategies against 
each other The computer analyzes the ottensive and 
defensive plays and calculates yardage lost or gamed 
Send S1995 tor your football cassette and instructions 

FERIN ENTERPRISES »*» 
6310 Underwood Ave. S.W. 
Cedar Rapids, Iowa 52404 

"TRS-80 is a trademark ot me Tandy Corp 



YOU TOO can 
become a 
successful 
computer 

ENTREPRENEUR! 



stf TE e f 



HOW TO START YOUR OWN SYSTEMS 
HOUSE is a practical step-by-step guide for the 
EDP professional or small businessman who 
wants to enter the micro-computer systems 
business. 

Written by the founder of a successful systems 
house, this fact-filled 220-page manual covers 
virtually all aspects of starting and operating a 
small systems company It is abundant with 
useful, real-life samples contracts, proposals, 
agreements and a complete business plan are 
included in full, and may be used immediately 
by the reader 

Proven, field-tested solutions to the many 
problems facing the small systems house are 
presented 

From the contents 

• New Generation of Systems Houses • The 
SBC Marketplace • Marketing Strategies • 
Vertical Markets & lAPs • Competetive Posi- 
tion / PI an s o f Majo r Vendors • Mar ket 
Segment Selection & Evaluation • Selection of 
Equipment & Manufacturer ■ Make or Buy 
Decision • Becoming a Distributor • Getting 
Your Advertising Dollar s Worth • Your Sales- 
men: Where to Find Them • Product Pricing 

• The Selling Cycle • Handling the 12 Most 
Frequent Objections Raised by Prospects • 
Financing for the Customer • Leasing • 
Questions You Will Have to Answer Before the 
Prospect Buys • Producing the System • In- 
stallation. Acceptance. Collection • Docu- 
mentation • Solutions to the Service Problem 
■ Protecting Your Product • Should You Start 
Now? • How to Write a Good Business Plan • 
Raising Capital 



6th edition. March 1980 



220 pages 



Ess«x Publishing Co. dept. 4 

285 Bloomfield Avenue Caldwell, N.J. 07006 

I would like to order HOW TO START YOUR 
OWN SYSTEMS HOUSE at $36 00 (New Jersey 
residents add 5% sales tax) ^272 

Check Enclosed VISA Mastercharge 



Name 








Address 








City 


State 






Z-p 


Card* 

For immediate shipment 

call (201) 783-6940 


on 


«xp. 

credit card orders 



*• Reader Service — see page 162 
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ysis of variation and analysis of 
covariance from user input. 
Documentation: Five pages- 
excellent 

Loading: OK— Level 6 
Implementation: If I lost you 
reading the purpose of these 
(five) programs, then we're still 
together. Quite frankly, I'm not a 
math major (or math minor 
either!) and this is way over my 
head. 

Suitability: Math students, 
scientists and anyone else who 
understands the terms used 
above can probably put this 
package to good use. 

Other programs available 
from M and S Computer Soft- 
ware: A Dissassembler. 

Vendor: Contract Services 
Associates, 1846 W. Broadway, 
Anaheim CA 92804 
Name: Form 1040A Tax Program 
Purpose: To help the user fill out 
the IRS 1040A income tax form 
Documentation: Two pages- 
complete 

Loading: OK— Level 7 
Implementation: You are asked 
to enter from the keyboard the 
information that will be used to 
fill out the 1040A. If you qualify 
for earned income credit (in- 
come under $8000), this is com- 
puted. You are directed to the 
tax tables and asked to enter 
your tax. The information re- 
quired on the form is then dis- 
played on the screen. 
Suitability: Since the form 



1040A is so simple to fill out, it 
would be hard to justify the pur- 
chase of this program for a one- 
time use. There is no guarantee 
that the form will be the same 
next year or that you will qualify 
for it. 

Other software from Contract 
Services Associates: All income 
tax forms and schedules (home 
and professional), Monitor, Cal- 
culator, Loan Payment Com- 
putation, Hex-Dec-Oct Conver- 
sions, Cash Flow Prediction and 
many more. 

Vendor: Circle Enterprises, Inc., 
PO Box 546, Groton CT 06340 
Name: File Handling 
Purpose: To keep a file of 
names, addresses, telephone 
numbers and birthdays 
Documentation: Self-document- 
ing 

Loading: OK— Level 7 
Implementation: Program is 
self-documented and easy to 
use. Names (last name first) can 
be entered in any sequence and 
will be arranged in alphabetical 
order. Any listing can be recall- 
ed, changed or deleted, and the 
entire block — name, address, 
telephone number and birth- 
day—will be displayed while it is 
being modified. You can step 
your way through the file or 
cause a list of all of the names 
and telephone numbers in the 
file to be displayed. No direct 
provision for hard copy is made, 
but this could easily be added. 



Suitability: This is another one 
that I've put into family service. 
It will handle up to 100 names 
and should be usable by most 
households. It ought to make 
our Christmas card list much 
simpler to generate this year. 

Other software available from 
Circle Enterprises, Inc.: Moving 
Signboard, Loan Payment, 
Prime Numbers, Amway Distrib- 
uter System and more. 

Conclusion 

Note that most programs 
were loaded with the CTR-41 
volume control set between 6 
and 7. In order to get a good 
CLOAD for the first time, I used 
the following procedure: 



10 Set the volume control to 4 

20 CLOAD 

30 II CLOAD fails THEN advance volume 

slightly:GOTO 20 
40 RUN 



Radio Shack has a modifica- 
tion out for the TRS-80 that uses 
the data on the tape instead of 
the computer clock for clocking 
the CLOAD. This should allow a 
much greater volume control 
setting range. I have another 
computer that uses that 
method, and I can set the 
volume anywhere from 1 to 10 
and still get a good load. 

When I CSAVE my own pro- 
grams, they CLOAD best with 
the volume set at 4Vi . I don't like 
to have tapes that play back 
at different levels because I 



usually forget to reset the 
volume control correctly. There- 
fore, once I get a good CLOAD. I 
CSAVE the program back to a 
second tape. This means that 
from now on it will CLOAD from 
this tape with my standard 
volume setting. Also note that 
most programs only take up a 
portion of the tape that they are 
sold on, so I put many programs 
on this second tape, which 
reduces the number of active 
tapes in my library. 

Most of the tapes that I re- 
ceived came without boxes. 
Since dust and error free digital 
tape recording are not compati- 
ble, I do not like to see cassette 
tapes lying around loose gather- 
ing dust. A box for each tape 
would be a small part of the ven- 
dor's program production ex- 
pense and would certainly be a 
beneficial service to the 
customer. 

I have barely scratched the 
surface of this field. While I was 
disappointed in some of the 
above software for the reasons 
given, I think that we have made 
a start in the right direction. 
However, I still think that there 
is a need for more sophisticated 
applications-type programming. 
Personal computing is growing 
up very rapidly. More and more 
people who are not interested in 
computers as a hobby are get- 
ting involved. They are going to 
demand and be willing to pay for 
good applications software. ■ 
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Wouldn't you hke access to YOUR entire typeset 7 Level II Basic con- 
verts lowercase command words into UPPERCASE All characters 
contained between quotes remain as typed, but the software in an un- 
converted TRS-80 allows UPPERCASE display only 1 This software 
shortcut allowed Tandy to omit one video memory chip This chip 
must be added and the video software repaired before the display o< 
duaicase is possible 



converting your TRS-80 requires installing the video memory chip plus wir- 
ing changes There is only one modification on the market which eliminates most of the wiring 
To get the duaicase mod installed you have three choices: 1) Send your computer to 
a company or individual who will do the wiring, 2) do it yourself, or 3) "THE PATCH" 
(trade mark). 

To make choices 1 & 2 operate requites using software overhead in the lorm of a "driver'' This 
takes 30 bytes, unless you want a "normal'' shift to UPPERCASE keyboard That takes upwards 
of 60 more bytes Software oriented mods have three more disadvantages 1) They reside in 
program memory, eating program space which you could be using, 2) other machine language 
programs are unusable if they are loaded against the top of memory, or 3) the driver ' software MUST 
be loaded every time you power-up. or the MEMORY SIZE?" appears due to program bomb Choice 
number three sutlers from NONE of the software overhead problems We call it THE PATCH" and its 
new for the 80s' 

THE PATCH a small electronic module which plugs into the unused ROM socket on Level II 
machines, makes necessary software changes to ROM supporting lowercase, an optional block cur 
sor. & extra keyboard debounce Electronically means NO software overhead Your computer 
displays lowercase instantly upon power-up. and the keyboard operates in normal typewriter 
fashion 

THE PATCH' is completely compatible with your TRS-80 since it is the 'irst. and only. TRS-80 
lowercase system designed that flawlessly mates with the computer as a unit, not just a special pro- 
gram package 

THE PATCH' is also the only modification of any kind which can have e»tra options and updates 
factory installed for 5 to 10 dollars per option as they are available Same day turnaround 

Order yours today to avoid extra delay Send $69 97 ♦ 2 50 for S&H to CECDAT THE PATCH '/ Box 
8963 i Moscow, ID 83843. (208)883-061 1 
THE PATCH is a Irademark of CECDAT, inc. v 195 
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^PRODUCTS [KTRS-80 




MALL 
YSTEM 



NEW! 



WHISTLER: HONE CONTROLLER INTERFACE - S3*. 95. New hardwire product that 
controls Ughtt, appliances, computer peripherals, darkroom timers and other 
115 volt devices an/where in your house! Software controlled by cassette 
cable. Use with Sears or 8SR How Control System with ultrasonic option. 
Assembled, tested, self-contained, and includes Basic software. 

TIS-aO DISK I OTHER NTSTERIES - 122.95, H.C. Pennington. Best disk book 
we've seen 1 Directory secrets, file formats, daaaged disk recovery, etc. 

LEARNING LEVEL II - S15.95, D.A. Lien. Learn Levcl-Z like you did Level-1, 
step by step. Same author and style as Level-1 aanual. Super new book! 

UTILITIES 

RSt-2: MACHINE LAMUAK NONITOR TOR 16* TRS-M'S - 126.95 
RSN-2D: THREE VERSIONS OF RSN-2 FOR RISK STSTEKS - 29.95 
RSfr-2 RELOCATOR: PUT RSH-2/2D ANTVMERE IN ACTOR T - 9.95 



Machine Language monitors with 2-80 disassembler! HEX and ASCII memory 
dumps; EDIT, ROVE, EXCHANGE, VERIFY, FILL, ZERO, TEST, or SEARCH memory, 
read/write STSTEN tapes, enter BREAKPOINTS, PRINT with TRS232 or Centronics, 
read/write disk sectors directly! RS»-2 tape loads at top of 16K LEVEL I or 
II; RSH-2D disk includes 3 versions for 16K, 32K and *8K. 

KV-1: CONVERT STSTEN PROGRAMS TO RISK FILES -»9.95. E«ecute Adventure, 
Air Raid, RSL-1, ESP-1, T-B06, etc. from disk, even it they interfere with 
TRSDOS' New version works with TRSDOS 2.3. 

EASIC-IP: LEVEL-1 BASIC NITH PRINTING' - B19.95. Run any LEVEL-I BASIC 
program on your 16K Level-2. PLUS LPRINT and LLIST with our TRS232 or 
Centronics. Furnished on tape; can be used from disk. 

MACHINE LANGUAGE GAMES 

AIR RAID, BARRICADE or RSL-1: - S10.00 each, all 3 lor S25.00 

All RAID: A super shooting gallery; our most popular game. Ground based 
missile launcher shoots high speed aircraft! Hours of fun! 

BARRICADE: "BREAKOUT" for the TRS-80! Break through 5 walls with 
high-speed ball and keyboard controlled paddle! 96 different options! 

RSL-1: Enter patterns with repeating keyboard! Save patterns on tap* (A 
'urnished). Play John Conway's LIFE. FAST - about 1 second per generation! 



SMALL SYSTEM SOFJWUE 



P.O. BOX 366 



NEWIVIT PAIR, CA 91320 



MODELII TRS-80' 

CP/N" VERSION 2.0 FOR THE MODCL-II - S170.00. Latest version from Digital 
Research. Runs both single and double density disks! "Standard" version 
runs nearly any CP/N software, including Cobol, Fortran, C-Basic, N-Basic, 
business and accounting packages, etc. Hundreds of programs available! 

RSNII: ENHANCED RSN NONITOR FOR THE NOfHL-II - S39.95. Relocatable version 

of RSN-2D plus screen editor for modifying either memory or disk sectors in 
both He* and ASCII, split screen scrolling, and formatted serial or parallel 
printing. Sold on self-booting disk; directions to save as TRSDOS file. 

PROFESSIONAL SOFTWARE 

THE ELECTRIC PENCIL FOR THE TRS-tX): TAPE-S99.95, DISK-S150.0O. Popular 
video editor for creating and saving te«t files. Prints formatted copy with 
right justification, page titling I numbering, etc. Upper case only, or 
lower case with modification. 16K Level-1 or 2 (tape). 

CP/N" OPERATING STSTEN FOR THE NODEL-I - SU5.00. The 8080/180 "Software 
Bus for the Nodel-1 TRS-80. Includes TRS232 and RS-232-C software, 
lower-case support, debounce, DCV-2 and other unique utilities. Allows use 
of many available programs written for CP/N. 

PRINTER SUPPORT 

TIS232 PRINTER INTERFACE - S49.95 (S59.95 after June 30). Assembled t 
tested printer interface for RS232 or 20-mil current loop printers. 
Eipansion interface not reauired. Print from level-II BASIC, CP/N, 
BASIC-IP, ELECTRIC PENCIL, etc. Standard cassette software included. Add 
S2.00 for shipping. 

TIS232 "FORMATTER- SOFTWARE PACKAGE - $14.95. Adds page and line length 
control, printer pause, "smart" line termination, etc. to TRS232. 

RSH232: Adds RS-232-C capability to RSN-2/2D monitors - S9.95 
PEN232: RS-232-C for cassette version Electric Pencil - 9.95 
EDT232: TRS232 and RS-232-C for tape version of EDTASN - 9.95 

OTHER PRODUCTS FOR THE TRS-80 

ESP-1: S29.95. Assembler, Editor, Monitor (8080 mnemonics) 
LST-1: 8.00. Listing of Level-1 BASIC with some comments 

"CP/N ta Digital Research, Inc. 'TRS-80 tm Tandy Corp. 

See your dealer or order direct. Calif. Residents add 61 tai 



SMALL SYSTEM SOFTNAIE 



P.O. BOX 3S6 



NEWBURY PAIR. CA S1320 



introducing... 



MAYDAY 




The Uninterruptable Power Supply that.... 

• Prevents loss of memory when power "blackouts" occur. 

• Prevents loss of memory or disk I/O errors when "brownouts" occur. 

• Provides time to continue operating complete system with disk drives 

to finish operations or store information. 

• Will handle most mini/micro computers with power consumption up to 

250 watts. 

• Designed and developed using complete TRS-80 System. 

Protect your Time and Investment 

For price lisl and detailed specifications, contact your nearest Sun-Technology 
distributor or call direct to: 



W 



K- 



r 7'.<V v 



• 151 



Bon 210 
.■v New Durhom, New Hampshire 03855 (603) 859-7 110 

Manufacturing high technology products since 1970) 



— TRS-80 MODEL II USERS — 




V» * 



Preserve — Protect — Display 

your equipment with 

CRYSTAL CLEAR 
PLASTIC COVERS 



e Keyboard S. CRT $24 95 M 

e Line Printer III Jl4 95ea 

pHn 1 1 .50 poitoge eoch 
(kvfcono if Mdp-.ii odd 4X tolei co>l 

Introductory Offer Buy both coven O iov* 



Combination price 134.95 
including postage 



Crown Plastic Co. ^266 
3746 N. College 317-925-5566 
Indianapolis. IN 46225 



^Reader Service — see page 162 
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TUTORIAL 



// you bought your 80 

to learn about computers, why upgrade to Level II? 



Inside Level I 



Robert V. Meushaw 
4188 Brittany Dr. 
Ellicott City, MD 21043 



Once I had worked my way 
through the TRS-80 Level I 
BASIC User's Manual and had 
run most of the examples, I grew 
itchy to move on to Level II 
BASIC. My friends who already 
had Level II machines constant- 
ly reminded me of how primitive 
my system was. The pressure to 
move up kept growing. 



I would have succumbed to 
the pressure, if I had not already 
gone through a similar experi- 
ence in my younger days when I 
had been bitten by the stereo 
bug. I had spent thousands of 
dollars on speakers, amplifiers, 
tuners, turntables, etc., In an at- 
tempt to own the ultimate sys- 
tem. Clearly, it was an impos- 
sible task. 

Looking back, I realized that 
my pretention overcame my bet- 
ter judgement. After all, the pur- 
pose of owning a stereo was to 



10 I = 1 


10 FOR I = 1 TO 15000: NEXT I 


20 1=1 + 1 


20 PRINT "DONE" 


30 IF 1 = 15000 THEN 50 


30 END 


40 GOTO 20 




50 PRINT 'DONE - 
60 END 


Listing 3: Single line ver- 




sion of timing loop in 


Listing 1: Timing loop us- 


Listing 2 (28 seconds). 


ing incremented variable 
(302 seconds). 








10 FOR 1=1 TO 5000 

20 •••' BASIC STATEMENT 




10 FOR I = 1 TO 15000 


30 NEXT 1 


20 NEXT I 


40 PRINT "DONE" 


30 PRINT ■•DONE" 


50 END 


40 END 






Listing 4: Program used 


Listing 2: Timing loop us- 


to investigate timing be- 


ing FORNEXT statement 


havior of various Level 1 


(33 seconds). 


BASIC statements. 



listen to music, not to claim the 
lowest distortion figures of any 
of your friends' systems. 

My ears could have been sat- 
isfied with a much less expen- 
sive system. 

I had to reevaluate my true 
motives for owning a computer. 
After several days of mulling it 
over, I realized I wanted to 
understand the underlying con- 
cepts of the machine. My true 
desire was to know the details 
of the Z-80 microprocessor, how 
the various software routines 
worked and how the Level I 
BASIC interpreter worked. There 
was so much more to learn on 
the system I already had. I had 
only scratched the surface of 
understanding the TRS-80. 

Level I BASIC 

What I needed was a more 
well-defined objective than just 
to "learn more about Level I." I 
decided to begin my investiga- 
tion with Level I BASIC and at- 
tempt to learn any technique 
that allowed me to use the lan- 
guage more efficiently. 

A simple timing experiment 
(Listing 1) opened my eyes. This 
is a very simple timing loop 
which increments the variable I 



from 1 to 15,000 and then prints 
'DONE". 

There is nothing amazing 
about this program, but I was 
dumbfounded to find that it took 
302 seconds to execute. In fact, I 
was so amazed that on the first 
several runs of the program, I 
terminated the execution pre- 
maturely because I thought the 
computer was broken. 

Why on earth, considering the 
speed of modern day comput- 
ers, should it take 302 seconds 
to count to 15,000? This was ex- 
temely puzzling, so for my sec- 
ond investigation I ran an equiv- 
alent program, shown in Listing 
2. It took only 33 seconds. 

Here was a problem worth in- 
vestigating: Why should two 
equivalent programs differ in ex- 
ecution time by a factor of 
almost ten? More importantly: 
What can be done to obtain the 
fastest program execution 
time? 

Out of curiosity, I tried to im- 
prove on the results of the pro- 
gram in Listing 2. Listing 3 
shows a third program that ex- 
ecuted in 28 seconds. This im- 
provement was not as dramatic, 
but it still amounted to about a 
15% increase in speed. 
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Tilt- DAL V-TRANS 1000 



A completely refurbished 
IBM Selectric Terminal witK 
built-in ASCII Interface. 

*FOR YOUR TRS-80 WITH OR WITHOUT 
EXPANSION INTERFACE. 



Features: 

• 300 Baud 

• 145 characters per second 
printout 

• Reliable heavy duty Selectric 
mechanism 

• RS-232C Interface 

• Documentation included 

• 60 day warranty - parts and 
labor 

• High quality Selectric printing 
Off-line use as typewriter 

• Optional tractor feed available 

• 15 inch carriage width 



I 



Also works with Kx- 
atron's Stringy Floppy, 
for fast loading of pro- 
grams. 



HOW TO ORDER 
DATA-TRANS 1000 

1 . We accept Visa, Master 
Charge. Make cashiers checks or 
personal check payable to: 

DATA-TRANS 

2. All orders are shipped 
F.O.B. San Jose, CA 

3. Deliveries are immediate 

New from 





The ultimate In 
space battle games 

Real Time 3-D action* 
Graphics & Sound • Voice 
optional • Projection map/ 
viewing screen. 
Battle a smart alien fleet in 
this exciting deep space con- 
flict simulation. 



On Disk, 48K only 

Fantastic Software 

3305 W. Spring Mt. Rd. 

Suite 49 ^224 

Las Vegas NV 89 1 02 



CREATE SUPERIOR GRAPHICS 

& ANIMATION 
Master Graphics Reference. Displays TRS-80 keyboard 
and graphics characters in all horizontal and vertical 
combinations Thousands of shapes, screened 63 at a 
time Or instantly access a specific group People, animal, 
vehicle, symbol shapes you didn't believe were there 
Ideal reference for animation, graphic ideas, symbology 

~ ~ ~ ™ flyTs hoot, 
chase, tee up 

Sumfun One. tight great games in one extended pro 

gram lake off and land from "Carrier" Set "Chopper - 

down safely with engine out. Shoot em down in "Jet 

Attack" Net "Butterfly" in a wild chase Play Front 9" 

mini golf Hit Fracshot "s split second target All genuine 

challenges that sharpen your skill, hold your interest 

for hundreds of plays Also "Dead Heat" (horse race), 

"Hotsy Totsy (number search) for family & party fun 

Programmed in BASIC for TRS-80 Lev II. 16K 

Double-load no rewind format Top quality digital 

cassettes, double wide pads, stainless pins. 

nylon rollers, screw shells Individually lab 

checked Cased 

Each, $16.50 Both $30.00 
If dissatisfied, return for full refund 
Florida residents add 4% sales tai. 

Order today from 




Desk and table top models also available. 
For orders and information 

DATA-TRANS 

2154 0^0016 51. +m 

UnitE 

San Jose, CA 95131 

Phone: (408)448-0800 




SPECIAL #1 

If vou purchase the TRS-80 DISK AND OTHER 

MYSTERIES Book for the regular price of S22 50 

you can buy 10 VERBATIM DISKETTES 

AND a plastic library case for (2200 

ioiai S44 50 



•" FREE SHIPPING FOR ORDERS OVER *70 00 "" 



SPECIAL #2 

If you purchase APPARAT NEWDOS* 

for the regular price of $99 95 

you can buy 10 VERBATIM DISKETTES 

AND a plastic library case for 5 00 

iotai 8104 96 



Suite 406 • 537 S. Sequoia Drive _ 

West Palm Beach, FL 33401 



•VERBATIM DISKETTES S26 50 

of \**b besi price vou find minus — 50C 

•PLASTIC LIBRARY CASE ~ S2 50 

• FLOPPY SAVER (reg $14 95) S 1 1 95 

* Send for a Free Catalog 

ALL ORDERS SHIPPED SAME DAY VIA UPS 



>Hf)?lS ** 69 4636 Par. Granada 
i:. ... Bum '59 

" naiabasan Cai.tom,a 9' TO? 

SlllVI.1 (213) 883-8594 



*• Reader Service -see page 162 
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Clearly, for a given program, 
there could exist a large number 
of equivalent programs whose 
execution times might differ 
substantially. Unless each 
equivalent program was coded 
and tested, it might not be possi- 
ble to determine a priori which 
would be fastest. 

I had defined my project: 
Determine a set of guidelines 
which could be applied to an ar- 
bitrary program to improve its 
execution time. 

The Approach 

Since I had already obtained 
execution times for the FOR- 
NEXT loop shown in Listing 2, it 
was a simple matter to add 
statements in the loop as shown 
in Listing 4 and measure the 
total time of execution. The ex- 
tra time for execution beyond 
that required by the FOR-NEXT 
loop would be directly attribut- 
able to the extra statement in 
the loop. 

For example, if the timing 
loop of Listing 2 required 48 
seconds to execute its 15,000 
iterations after a statement was 
added, then the additional time 
required because of that state- 
ment would be 48 minus 33 = 15 
seconds. If the time per execu- 
tion of that statement was com- 
puted, it would be 15/15,000 = 
.001 seconds. 

In practice, the delay loop 
which I used performed 5000 
iterations because it did not 
result in excessive execution 
times. 

■ Firstly, I attempted to cate- 
gorize the kinds of Level I BASIC 
statements including: 

Assignment Statements; 



Arithmetical Statements; 

Logical Assignment State- 
ments; 

Single Parameter State- 
ments; 

Two Parameter Statements; 

Transfer of Control State- 
ments; 

Conditional Statements; 

I/O Statements. 

Within each statement cate- 
gory, I included various forms of 
each statement in order to test 
the effect of the variations. 
While the list is not exhaustive, 
it's sufficient to gain an under- 
standing of the overall opera- 
tion of Level I BASIC. 

The Assignment Statement 

Table 1 shows the execution 
times of the assignment state- 
ment variations. The various 
forms included the assignment 
of constants, variables, array 
elements and strings to real 
variables, string variables and 
array element variables. 

For example, the first two 
results show that it requires 
more time to assign a constant 
to the variable K than to assign 
the value of X to K. 

The next two lines show that 
it requires less time to assign K 
the value of a variable array ele- 
ment, i.e. A(X), than to assign it 
the value of a particular array 
element, i.e. A(7). 

Comparing these results with 
the previous results shows that 
it requires more time to assign W 
the value of an array element 
than a non-array element. For in- 
stance, in going from K = A(8) to 
K = X, we can cut the execution 
time by 41%. 

The next three lines show the 





Assignment 


Statements 


BASIC Statement 




Execution Time (Sec.) 




K = 5 




007 




K^X 




0058 




K = A(5) 




.0096 




K = A(X) 




0066 


LET 


K = 5 




.0046 


LET 


K = X 




.0034 


LET 


K = A(X) 




0062 




A(5) = 5 




0106 




A(l) = 5 




0096 




A(5) = X 




.0096 




A|I) = X 




.0084 


LET 


A(I) = X 




.006 




A$= ABCD' 




.0042 


LET 


A$ = "ABCD' 




0018 


Table 1: Execution times 


for 


Level 1 BASIC Assignment 


Statements. 









considerable savings that result 
from using the optional assign- 
ment statement LET. Going 
from K = A(8) to LET K = X we 
can cut execution time by over 
65%. 

The next series of statements 
shows the results of assigning 
values to array elements. As you 
see, the fastest executing state- 
ment uses only variables and 
the LET statement (i.e., LET 
A(I) = X), and the slowest uses 
constant parameters without 
the LET statement (i.e., A(8) = 
7). 

Finally, the limited string as- 
signment capabilities of Level 
I are evaluated in the last two 
statements. As expected, the 
use of the LET statement results 
in a considerable savings in 
time. 

Aside from comparing rela- 
tive speeds it is interesting to 
examine the absolute times re- 
quired to execute assignment 
statements. 

It takes approximately 10 ms. 
to execute these assignment 
statements. If you approximate 
the machine instruction execu- 
tion time of the microprocessor 
as 6 microseconds, it would ap- 
pear that as many as 1500 
machine instructions are ex- 
ecuted in carrying out one 
BASIC assignment statement. 

These crude approximations 
can give some insight into the 
relative inefficiency of an inter- 
preted language as compared to 
a machine code implementation 
of the same operation. 

Arithmetical Statements 

Since so many programs in- 
volve arithmetic functions, the 
results of Table 2 are particular- 
ly interesting. The left column of 
the table shows the expressions 



Logical Assignment Statements 


A = (B = C) 


.011 


A = B = C 


.0086 


LET A = B = C 


0062 


A = B>C 


.0086 


A = B< = C 


.0085 


7ao/e 3: Logical Assign- 


ment Statemen 


Ex ecu- 


tion Times. 





evaluated in the timing loop de- 
scribed previously. 

Each expression is written in 
a general form using ? to stand 
for one of the functions + , - , /, 
or *, shown at the top of the 
table. All the functions have 
relatively close execution times. 
Addition and subtraction, for ex- 
ample, have nearly identical ex- 
ecution times. The next fastest 
function is multiplication, and 
division is the slowest function. 

Comparing execution times 
in each column, we get similar 
results to those previously ob- 
tained. For a given expression, 
approximately 24 percent more 
time is required if parentheses 
are used, and approximately 26 
percent less time is required if 
the LET statement is used. Addi- 
tionally, substitution of 
variables for constants im- 
proves execution speed. For in- 
stance, A = I + J is 24 percent 
faster than using A = 5 + 5. 

Logical Assignment Statements 

Often programs require the 
use of Boolean variables, or 
variables which take only two 
values, usually and 1. 

Table 3 shows some ex- 
amples of statements which 
compute the value of a Boolean 
variable. The first statement 
assigns A the value of 1 if (B = C) 
and otherwise. The second 







Arithmetical Statements 

+ - 




/ 




A = 5?5 


.01 


.01 


.011 


.0118 




Ar l?5 


009 


009 


.01 


0104 




A _ l?J 


.0076 


008 


.0088 


0092 




A = (5?5) 


0124 


0124 


.0134 


0142 




A = (l?5) 


0114 


.0114 


.0124 


.0128 




A=(I?J) 


01 


0104 


0112 


0116 


LET 


A-5?5 


.0074 


.0074 


.0084 


.0092 


LET 


A = l?5 


.0066 


.0066 


.0074 


.0078 


LET 


A = I?J 


.005 


.0054 


.0062 


.0068 


7"ab/e 2: Arithmetical Statement Execution Times 


for Level 1 


BASIC. 
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CIRCUIT BREAKER PRICE SLASHING 



16K MEMORY UPGRADE KITS 

for TRS-80*, Apple 

PRINTERS 




II, Sorcerer (specify) VvW 

NEC Spin writer 

Letter Quality High Speed Printer 

Includes TRS-80* interface software, quick 
change print fonts, 55 cps, bidirectional, 
high resolution plotting, graphing, propor- 
tional spacing $2998 
With Tractor Feed $3198 

DIABLO 1650 Letter Quality High Speed Printer 

Prints at 40 cps, using 88, 92 or 96 char. Metalized printwheels. 
Vertical resolution jj,"; Horizontal % n ". Capable of proportional spac- 
ing, bidirectional printing, and graphics under software control. 
Bidirectional normal and direct tabs. Left, right, top and bottom 
margins. Friction and tractor feed. r.o. $2890 

KSR$3285 
779 CENTRONICS TRACTOR FEED PRINTER $969 

Same as Radio Shack line printer 
737 CENTRONICS FRICTION A PIN FEED PRINTER $849 

Text quality matrix , proportional spacing 
730 CENTRONICS FRICTION ft PIN FEED PRINTER $639 

7x7 matrix 
P1 CENTRONICS PRINTER $339 

Same as Radio Shack quick printer 
PAPER TIGER (I P440) $949 

Includes 2K buffer and graphics option 
TI-810 

Parallel and serial w/ TRS-80* interface software $1575 

with upper and lower case and paper tray $1665 

OKIDATA Mlcroiine 80 Friction and pin feed $795 

Tractor Feed, friction, and pin feed $920 

EATON LRC 7000 + 64 columns, plain paper $349 



LEEDEX MONITOR Video 100 



$135 



SOFTWARE FOR THE TRS-80* 



Free enhancements and upgrades to registered 
owners tor (ha coal of madia and mailing. 30-day Iroe 
t elephone support from vendor. User references sup 
piled upon raquaat SSSG maintains a time-sharing 
computer where you can dial-up and leave your prob- 
lems. 24 hours, 7 days a weak. 

KVP- Allows use of serial printer with TRS 60' Lower 
case Keyboard deOounce Direct entry ol graphics 
and control characters from the keyboard S2M6 

Fujy aaaSJMataal !■— $m fsntsas Requires 2, 3. or 

« drive, includes General Ledge' Accounts Payable. 
Accounts W s o sweftts. and Payroll Report gener at ing. 
We* documented and toMy Meted by accountants 
Complete Package: 
individual Modules 



j at Require* 2 or 3 drives Handles up to 1000 
■terns per disk dnve Reports include co m p lete activity, 
inventory, listing and minimum quantity search 



M aking List Name • Address II System Requires 2 
drives Use with Electric Pencil liles loi automatic 
insertion ol name address and greetings in letters 
Mas adMy lo punt envelopes Menu driven Includes 
enter delete update search extract merge and prinl 
Lip 10 1250 names per diskette Will sort up to 600 
names in 7 minutes 40 pegs manual Zip code sort is 
eacellent for bulk mail applications WS.OC 

InfaMuanl Terminal System St-80 III: Enables a 
TRS 80 ■ to act as « dial up terminal on any standard 
time sharing network Provides a TRS 80' with control 
key ESC Key Repeat Key. Rub Out Key. Break Key. lull 
upper and tower case Support selectable printer out 
put and program selectable transmission rates 

llet.00 



Stock and Sand Portfolio Management System: 
Designed lor the slock investor to track individual 
buys and sells of assets and to examine the total buy' 
sell portfolio with a minimum of lime and effort Sup 
ports up to 999 clients. 500 assets and 3.000 outstand- 
ing transactions. This system has the advantage of 
maintaining all open information on file by specific 
transaction Both YTO unit and % amount ol purchase/ 
sales are summarized 'or each client in the Client 
Master Current total stock levels for each stock is 
available >n the Asset Master 1 188.00 



Caent ■kstng S ys t e m : Designed tor CPA and law firms 
lo track time and activities lor services) performed lor 
clients Supports up to 909 clients 99 employees 99 
pre-coded activities and 3000 outstanding "ansae 
ttons This system has the advantage of maintaining 
all information on tile by specific transaction Avail 
ade information include personnel/expense reports 
for each client YTO hours and % amount for clients 
employees and activities reports of employee m 
house activities and work m-progress Summaries 

$29900 



FHe Managemen t System: For specialized storage 
needs Sorts files n ascending or descending order on 
3 separate fields Scanabie Some applications have 
been iiaed assets phone numbers names, slides, 
albums Selectively totals numeric and dollar fields 
Display and print capability $48.00 



S*M SYSTEMS 

INSEQ-OO'" - Indexed Sequential Access Method 
(ISAMJ lor the TRS-80' Model I Foul machine lan- 
guage programs thai can be called Irom your BASIC 
program via USR functions to access records either 
sequentially or randomly The INSEO 80 programs 
maintain all indexes and chains tor you Includes 
reorganization utility to consolidate tiles 



»*• DISK DRIVES $299 

More capacity than Radio Shack 35 Track (80 K 
Bytes) drives. Fully assembled and tested. 
Ready to plug-in and run the moment you 
receive it. Can be intermixed with each other 
and Radio Shack drive on same cable. TRS-80* 
compatible silver enclosure. 
90 DAY WARRANTY. ONE YEAR ON POWER SUPPLY. 
FOR TRS-80* 

CCI-100 5'/4", 40 Track (102K Bytes) for Model I $299 

CCI-200 5V4", 77 Track (197K Bytes) for Model I $549 

CCI-800 8" Drive for Model II ( Vi Meg Bytes) $795 

For Zenith Z89 

CCI-1 89 5 % ", 40 Track (1 02K Bytes) add-on drive $394 

Z-87 Dual 5 '/. " add-on drive system $1095 

DISKETTES — Box of 10 (5!A") $24.95 

— 8" double density for Model II (Box of 10) $36.49 

DISK OPERATING SYSTEMS 

PATCHPAK #4 by Percom Data $ 8.95 

NEWDOSPlut — with over 200 modifications 35 Track $ 89.00 

and corrections to TRS-DOS 40 Track $ 99.00 

CP/M for Model I, Zenith $145.00 

CP/M for Model II. Altos $170.00 

COMPLETE SYSTEMS 

TRS-80* LEVEL II-16K with keypad $699 

TRS-80* Expansion Interface $249 

ZENITH Z89 ,16K expand* to 48K, all-in-one computer $1949 

ZENITH Z19 $740 

ATARI 400 $524 ATARI 800 $849 

MATTEL INTELLIVISION $249 

Tl 99/4 . $979 

NORTH STAR W^** Call for prices 



CAT MODEM Originate and answer same as 
Radio Shack Telephone Interface II 



$157.50 



CP/M BASED SOFTWARE 
for Zenith, Altos, Radio Shack -ZZllir 



OKJfTAL RESEARCH 

MAC - 8080 Macro Assembler Full Intel macro defini- 
tions Pseudo Ops include RFC. IFtP. REFT, TITLE. 
PAGE and MACUB. 280 library included Produces 
irrtel absolute hex output plus symbols file for use by 
SID (see below) $120*15 

SID - 8080 Symbolic debugger. Full trace, pass count 
and break point program testing system with back 
trace and histogram utilities When used with MAC 
provides full symbolic display of memory labels and 

equated values 1106415 

ZM> - As above for ZB0 Requires Z80 CPU 1130425 
TIX - Tent formatter to create paginated, page- 
numbered and lustitied copy from source teit files 
directabte to disk or printer S10S/S15 

OK eH m - Program to permit simultaneous printing 
of data from disk while user saccules another pro- 
gram from the console (6086 

MICROSOFT 

leeic BO- Disk Ertenoed BASIC ANSI compatible 
with long variable names. wwiE WEND chaanmg. 
variable length file records I X Ulfl 

Bask: C ompear Language compatible with BASIC 80 
and 3 10 times taster eaecution Produces standard 
Microsoft relocatable binary output Includes 
MACRO 80 Also linkable lo FORTRAN 80 oi 
COBOL 00 code modules S360rS26 

MICROPRO 

WORDSTAR Menu driven visual word processing 
system tor use with standard terminals Text format- 
ting performed on screen. Facilities tor lent paginate, 
page number, lustity. center and underscore User can 
print one document while simultaneously editing a 
second Edit facilities include global search and 
replace Read/Write to other teat files, block move, etc 
Requires CRT terminal with addressable cursor posi 
Honing (446040 



S t M SYSTEMS 

Fully Interactive Accounting Package: Include-, 

General Ledger. Accounts Payable. Accounts Receiv 

able, and Payroll Individual Modules WM1S 

Inventory S12M30 

cci 

TELNET Version S Comprehensive intelligent ler 
minal program Supports numerous teleprocessing 
protocols Reads and stores teleprocessing data 
ond.sk »7W1S 



ACCESSORIES 



HEAO CLEANINO DISKETTE Cleans drive 
Read/Write lead M 30 seconds Diskette absorbs 
loose oaide particles fingerprints and other foreign 
particles thai might hinder the performance of the 
drive head Lasts at least 3 months with daily use 
Specify 5V or 8" S20eaA45tar3 



FLOPPY SAVER: Protection lor center holes of 51.' 
floppy disks Only i needed per diskette Kit contains 
centering post pressure tool tough 7-rmi mylar rein 
lorcing rings Installation loots and rings lor 2S disk 
ettes 114.16 

Reorders ol rings only 87.86 



Send for 

FREE Catalogue 



The CPU SHOP 

TO ORDER CALL TOLL FREE 1-800-343-6522 

Massachusetts residents call (617)242-3361 

For detailed technical information, call 617/242-3350 

Hours: 10AM-6PM (EST)M-F(Sat. till 5) 

*TRS-80 is a Tandy Corporation Trademark 



• 296 



5 Dexter Row, Dept. K6M 
Charlestown, Massachusetts 02129 

Massachusetts residents add 
5% sales tax 



Quantities on some items are limited 
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Single Parameter Statamants 




K = RNDI66) 


.0134 




K = RND(X) 


.012 


LET 


K s RND(X) 


0096 




K = RND<30000) 


.014 




K = RNCHO) 


.0098 




K = RND(J) 


0088 where J = 


LET 


K = HNO(O) 


0072 




K = INT(5) 


.0096 




K = INT(X) 


0084 


LET 


K = INT(X) 


006 




K = ABS(5l 


.0086 




K=ABS(X) 


.0074 


LET 


K^ABS(X) 


005 


Table 4: Single parameter statement execution times. 



statement may look somewhat 
strange, but it is equivalent to 
the first and it executes 22 per- 
cent faster. 

This is another example of the 
execution time penalty incurred 
when unnecessary parentheses 
are used. As expected, the use 
of the LET statement provides a 
significant decrease in execu- 
tion time over the first state- 
ment. In this case the decrease 
amounts to 44 percent. 



The last two statements show 
that there is no substantial dif- 
ference in execution time when 
using logical tests such as 
"greater than," "less than or 
equal," etc. 

On the average, the logical 
assignment statements are 
noticeably slower than the addi- 
tion/subtraction statements, 
which surprised me. This may 
indicate that arithmetical state- 
ments can be used in place of 



HARD CDPV 



IS 



STORAGE 

a problem? 




f-ro*^ 






The year's half over and your copies 
of 80 Microcomputing are still lying 
around in messy piles or worse! 
Straighten out the situation with 80 
Microcomputing Library Shelf Boxes 
sturdy, corrugated, white, dirt-re- 
sistant boxes will keep your issues of 80 Microcomputing orderly 
and available for constant reference Self-sticking labels are 
available for the boxes, too, not only for 80 but also for Kilobaud 
Microcomputing, 73 Magazine, CQ, QST, Ham Radio, Personal 
Computing, Interface Age, Byte and Radio Electronics Ask for 
whichever labels you want with your box order Each box holds a 
full year of the above magazines Your magazine library is your 
prime reference Keep it handy and keep it neat with these strong 
library shelf boxes One box (BX1 000) is $2 00. 2-7 boxes (BX1001) 
are $1.50 each, and 8 or more boxes (BX1002) are $1 .25 each Be 
sure to specify which labels we should send Shipping and han- 
dling charges are $1.00 per order Call in your credit card orders 
on our toll free line 800-258-5473, or use the order card in the back 
of the magazine and mail to 



m 



microcomputing 



Mi i* -t t. week! 'or deliver* No ( OD owtei 



Peterborough, 
NH 03458 

epted 



Two Parameter Statement* 
SET(30.47) .0112 

SET(X.Y) .008 



REST0O.47) 

RESET(X.Y) 

K = POINTQ0.47) 
K = POINT(X.Y) 
LET K^POINT(X.Y) 



.0098 
.0066 

0146 
.0114 
.009 



Table 5. Two-parameter 
statement execution 
times. 



logical statements in cases 
where execution time is critical. 

Single Parameter Statements 

Level I BASIC includes the 
single parameter functions 
RND, INT, and ABS, which are 
shown in various forms in Table 
4. The examples given for all of 
these functions show a modest 
increase in speed when using a 
variable rather than a constant 
parameter. 

The speed increase ranges 
from 10.5 percent for the RND 
function to 14 percent for the 
ABS function. A LET statement 
increases the speed more dra- 
matically. This increase ranges 
from 28 percent for the RND 
function to 42 percent for the 
ABS function. 

In Level I BASIC when RND(0) 
is used, a random number be- 
tween and 1 is generated. This 
particular function executes 
considerably faster than when 
the RND function is used with a 
non-zero constant parameter or 
even a non-zero variable param- 
eter. 

The fastest execution of RND 
results when a variable whose 
value is is used as a param- 
eter. It is interesting to note that 
the execution times of the ABS 
and INT functions are on a par 
with the addition/subtraction 
assignment statements shown 
in Table 2. However, the RND 
function appears considerably 
slower than even the division 
statements shown in that table. 

Two Parameter Statements 

There are three statements in 
Level I BASIC which require two 
parameters. These statements, 
summarized in Table 5, are all 
associated with the TRS-80 
graphics. 



The SET statement is used to 
turn on a particular point in the 
128 by 48 point display, while 
RESET is used to turn off a par- 
ticular point. POINT is a 
Boolean function used to deter- 
mine whether or not a particular 
point is turned on. 

As expected, each of these 
statements executes faster 
when using variable parameters 
rather than constants or other 
expressions. Oddly enough, it 
requires considerably more time 
to turn on a point than to turn it 
off, despite the fact that the in- 
struction set of the Z-80 micro- 
processor allows a particular bit 
in memory to be set to 1 as 
quickly as it can be set to 0. 

The POINT statement is the 
slowest of the graphics instruc- 
tions, even when it employs a 
LET statement. Unfortunately, 
the LET statement cannot be 
used to increase the speed of 
the SET or RESET statements. 

It is possible to determine the 
approximate time required to 
turn on or off every point in the 
display, using the figures in 
Table 5 and the fact that there 
are 128 x 48 = 6144 individual 
points in the display. The time 
required to turn on 6144 points 
is approximately 49 seconds, 
while the time required to turn 
them off is 41 seconds. But this 
does not include the time re- 
quired by the necessary FOR- 



10 


FOR 1 = 1 TO 5000 


20 


GOTO 30 


30 


NEXT I 


Listing 


5a. Program used 


to test GOTO statement. 


10 


FOR I = 1 TO 5000 


20 


GOSUB 100 


30 


NEXT I 


100 


RETURN 


Listing 5b: Program used 


to test 


GOSUB/RETURN 


statements. 


10 


FOR 1 - 1 TO 5000 


20 


GOTO 100 


30 


NEXT I 


100 


GOTO 30 


Listing 


5c: Program used 


to compare GOTO state- 


ment 


with GOSUB/RE- 


TURN statements. 
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NEXT loops. Using the results of 
Table 1 to approximate the loop 
time necessary for 6144 itera- 
tions adds about 14 seconds to 
the total, giving us 63 seconds 
to turn on all the points and 55 
seconds to turn them all off. 

Transfer of Control Statements 

Measuring the execution 
speed of a transfer of control 
statement required a slightly dif- 
ferent approach. 

The GOTO statement re- 
quired a number to which con- 
trol could be passed. The 
GOSUB statement required not 
only a control number, but a 
RETURN of control to the state- 
ment after the GOSUB. 

The particular routines which 
I used to test these statements 
are shown in Listings 5a, 5b and 
5c. Listing 5a allows the GOTO 
statement to transfer control to 
the NEXT statement of the tim- 
ing loop. Listing 5b was used to 
test the GOSUB/RETURN state- 
ments. Listing 5c was used to 
compare the transfer of control 
to a routine using only GOTO 
statements with that required 
by the GOSUB/RETURN state- 
ments. 

The results are given in Table 
6. Interpreting them is not as 
clear cut as in the previous 
cases. To execute a given rou- 
tine using only GOTO state- 
ments is faster, but this routine 
is not as flexible as one that 
uses GOSUB/RETURN state- 
ments, especially in the return 
of control to the calling routine. 

There may be occasions 
when you can use the increased 
speed of the GOTO to your ad- 
vantage. In comparison, the 



transfer of control using only 
GOTO statements is approx- 
imately 14 percent faster than 
using GOSUB/RETURN. 

A similar savings should be 
gained by using the ON N GOTO 
rather than the ON N GOSUB 
statement. Of course, the entire 
overhead associated with the 
transfer of control can be avoid- 
ed, at the expense of a longer 
program, by including the sub- 
routine as in-line code. 

Unfortunately, in Level I 
BASIC you cannot use a vari- 
able name in place of a line num- 
ber in the transfer of control 
statements (e.g. GOTO K), so 
this trick does not reduce execu- 
tion time. 

Conditional Statements 

Level I BASIC includes only 
the IF-THEN conditional state- 
ment. At first glance, it does not 
appear that there is much you 
can do to improve its operating 
characteristics. 

I found, however, that in some 
cases the THEN portion of the 
statement is unnecessary. In an 
expression such as IF X = 1 
THEN 100, where control is 
passed to line number 100, 
THEN is required, but for condi- 
tional assignment statements, 
etc., it's simply not. 

The execution times in Table 
7 indicate that there is no penal- 
ty in speed for omitting the 
THEN statement, so this is a 
four byte savings which is 
always worth taking. 

The execution speed of the 
conditional statement depends 
heavily upon whether or not the 
condition tested is true or false. 
By comparing the third and 





Transfer ol Control Statements 




GOSUB - 


GOSUB 100 
100 RETURN 


0072 


GOTO - 


GOTO 30 
30 NEXT 1 


0026 




GOTO 100 


0062 




30 NEXT 1 






100 GOTO 30 




ON N GOSUB 


ON N GOSUB 100 
100 RETURN 


0092 


ON N GOTO 


ON N GOTO 30 
30 NEXT 1 


0062 


Table 6. Execution times for the transfer of control state- 


ments. 








on computers, peripherals, software and other Radio Shack ' products. 
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Radio ShaeK 
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17£4* I FREE delivery available on minimum orders. 
I WARRANTIES honored by Radio Shack" . 
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Conditional St«t«m»nt» 


(The following execution times 


| are measured with J = 1 




IF J = 1 THEN X = 1 


0142 


IF J = 1 X = 1 


0142 


IF J = 1 LET X « 1 


.0114 


IF J =2 THEN X = 1 


007 


IFJ = 2X*1 


007 


Table 7: Execution times 


for conditional 


state- 


ments. 





fourth statements in Table 7, 
you can see that when the test 
fails, its execution speed Is in- 
creased by a minimum of about 
40 percent. 

This means that, where feasi- 
ble, conditional statements 
should be constructed to allow 
for failure of the condition 
tested. It is probably safest to 
time your program with condi- 
tionals that usually test true, 
and again with conditionals that 
usually test false, in order to 
determine which approach is 
fastest. 

I/O Statements 

Because of the limitless num- 
ber of ways in which strings, 
variables, TABs, ATs, constants, 
etc., can be combined in an I/O 
statement, it is a large field to 
test. I limited my survey to a few 
combinations which provide in- 
sight into possible areas of sav- 
ing. These are shown in Table 8. 

The first eleven statements 



are examples of PRINT state- 
ments. The results seem in- 
conclusive, except to say that 
using a variable parameter in an 
AT statement is faster than us- 
ing a constant. It also appears 
that suppressing the carriage 
return in a PRINT statement, 
ending it with a ";", saves time. 

After further consideration, it 
seems to me that the execution 
speed of the PRINT statement is 
not really significant because it 
makes no sense to print huge 
amounts of data -the display 
screen only holds 1024 charac- 
ters. Execution speed is impor- 
tant only in the internal compu- 
tation that occurs before a print 
statement. 

The data entry statements 
available in Level I BASIC are 
the INPUT and READ state- 
ments. The INPUT statement, of 
course, requires manual inter- 
vention to supply the data. But 
the READ statement, since it 
can execute continuously in a 
timing loop, is measurable. 

It was necessary for me to in- 
clude a RESTORE statement 
with the READ statement in the 
timing loop, since I didn't want 
to type a DATA statement with 
5000 entries, even if I did have 
sufficient memory to hold it. I 
determined the 'execution time 
for a single READ operation by 
independently finding the ex- 
ecution time of the RESTORE 
statement and subtracting this 





Input/Output Statements 




PRINT 


PRINT 


.0172 




PRINT " " 


.0184 




PRINT " "; 


0042 




PRINT • (64 spaces) " 


0278 




PRINT - (64 spaces) "; 


027 




PRINT AT 0, " " 


0098 




PRINT AT 0.""; 


0086 




PRINT AT N. " "; 


0072 




PRINT AT 0. • (64 spaces)" 


0178 




PRINT AT 0. "(64 spaces)"; 


0178 




PRINT TABdO): " ". 


0088 


INPUT 


Not measured 




READ/RESTORE 


READX 
RESTORE 


012 




RESTORE 


0022 


(from above we 


READX 


0096 


can compute) 






DATA 


DATA(.. 20 ITEMS ) 


003 


CIS 


CLS 


.0262 


Table 8: Execution times for various I/O statements. 



from the combined READ/RE- 
STORE execution time. These 
results are also displayed in 
Table 8. 

Some interesting tradeoffs 
are available when using 
READ/RESTORE statements. 
For example, if a sequence of 
numbers is referenced frequent- 
ly in a program loop, the num- 
bers can be referenced either as 
array elements or by READ/RE- 
STORE statements. 

The DATA statement is not 
normally considered execut- 
able, but it does require time to 
determine that it isn't an ex- 
ecutable statement. When 
placed in the FOR-NEXT timing 
loop, I measured an "execution" 
time of .003 seconds. This time 
did not vary appreciably with the 
number of items in the state- 
ment. 

I arbitrarily included the CLS, 
or clear screen, statement in 
Table 8. This is the slowest exe- 
cuting statement in all of Level I 
BASIC. I didn't know why, so I 
explored it in more detail. 

By consulting a Z-80 micro- 
processor reference card, I 
developed an assembly lan- 
guage routine which cleared the 
screen (Listing 6). It first loads 
the HL register with the start ad- 
dress of the display memory 
(i.e., 3C00 hex) and then stores a 
blank at that location (i.e., 20 
hex). 

Next, the DE register is load- 
ed with the address of the sec- 
ond display location address 
(i.e., 3C01 hex). Then the BC 
register is loaded with the 
number of bytes to be moved in 
the following "block move" in- 
struction. The effect of the 
"block move" is to clear the 



Compound Statements 


K = INT(A(X)| 


0074 


K = ABS(X* Y) 


0094 


K = ABS< A(X| ) 


0114 


K = INT(X) 


0084 


K = INT(X + Y) 


0104 


K = INT( A(X) 1 


0114 


Table 9: Execution times 


for various 


compound 


statements. 





screen. 

Each instruction in Listing 6 
is accompanied by the number 
of "T cycles" It requires, where a 
"T cycle" corresponds to the 
machine clock period. The total 
time required by this routine is 
shown beneath the listing. 

The number 1023 in the calcu- 
lations is the number of bytes 
moved in the block move, and 
the number 1 .8 x 10* *6 is the ap- 
proximate clock speed of the 
TRS-80. The total time required 
by the assembly language pro- 
gram is approximately .012 sec- 
onds, just under one-half of the 
time required by the CLS state- 
ment. 

Compound Statements 

After determining the execu- 
tion times of various Level I 
statements, I decided to ex- 
amine their behavior when they 
were combined. Table 9 shows 
the execution times of the ABS 
and INT statements used with 
different parameters. In both 
cases, the fastest execution 
time results when a simple 
variable is used as a parameter, 
which is not surprising. 

It occurred to me that by 
decomposing them into several 
simpler statements, I might 



Instruction Number of T cycles 

LO . HL.3C00H 10 

ID (HLI.20H 10 

LD DE.3C01H 10 

LD BC.3FFH 10 

LDIR 21 

Total T cycles = 10 + 10 + 10 ♦ 10 ♦ 1023*21 
= 40 + 21483 
= 21523 

One T cycle = 1/(1.8' I0"6)sec 
Total time = 21523/(1.8 ' 10"6) 

= 0119 

= .012 sec 

Listing 6: Assembly language program to perform CLS (clear 
screen). 
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LYI\T>CO^ 

makes your TRS-80 
a whole new 
animal. 



LYNX Isn't just a telephone coupler. 

LYNX is a one-piece total telephone linkage 

system for TRS-80 Level I and II computers. It 

contains all the functions you need to tap The 

Source. Engage your business computer. Play 

games with a computer friend. Or do nearly 

anything you wish. 

Best of all . . . LYNX costs only $239.95*. A mere 

fraction of what you used to have to pay for 

equipment to do the same job. 

LYNX. To get your paws on one, call or write: 



EMTROL 
SYSTEMS, INC. ^e 

1262 LOOP ROAD LANCASTER. PENNSYLVANIA 17601 

Phone 717/291-1116 

VISA or Master Card Welcome 




AM $? 50 lot ttcpng *W twang 

WOuOes ' fcmwul woqoti or CKMtte nsnvoen nunu* 




IRS-80 is a Kadena* ol it* Rmo Sum Dvsion ol landy Co-pcjlion 



BRING YOUR TRS-80 
KEYBOARD TO LIFE! 

Mor* 'hor o y*or ago -• us*d lh.» h*odlm« lo introduce AUTQK O^d 
QCDlT - ■«• .*,Booffl au'cepeo' and qu»<tt *dtf ifUMM for L«v*l II BAStC 
Th»y .•> b»#n ,t?'v popular but w« cou'dn f r#*i*l working »h#m o.»' 
on»wO> in r#»pon*« to Customer »ugg»tf io*i% Th# rMull' UTIMI. a -a*' 
ly improved AUTO* QfDlT and a *ew th.ng* mort 

With IfTIOIT and your Level II or Di*h BASIC lyt'tm you 0*1 

■ Debount.ng Mo need »o ut* Bod.o Shock * KBFIX I 

• Au<0'«peoi o« every key Jut) hold o key down ond otter a holt 
second d#!oy the ehcocier repeats oboui e»ghi per second 

• S>ngl« keystroke keyword entry Hold down SHIFT Ml o l*n»r key 
and on ent<re BASIC keyword <s spelled out o< once Plus you ton as 
*.gn ony keyword to any key 1 

• Keyboard mocro facility Any frequently typed po"t?rn con be defined 
ond late' invoked \H a >>ngl* keystroke Vou |us' (til tn the blonks 
lakes the drudgery out o' repetitive* keying 

• Screen oriented editing KIVfCHT \ tursot mav»i anywhere in a display 
ed program lithng for initanl intercom ond deletions Plus whole 
slaiemenls can be ropied to other pads ol the program oi combined to 
lorm longer ones without retyping the NMl Makot BASIC s €OlT tunc 
lion obsolete* 

• losy loading KlYfDlT oods from cassette using ClOAO even though 
it s written in mochtne language and moy be saved on disk Features 
can be deleted selecl.-elyiust by delet.ng lines 0>c» RUN UTIMI pro 
tecls >t*elf m memory and links into BASIC where >l unobtruS'vely 
awoits your command 

• Thorough documentation Eoch feoture is e*plomed Mi detail along with 
initrvct'om *o* user modi*»cotions 

IITIMT w -I I save you hours ol eMorl m BASIC program development So 
why wOSte onother mtosyle?? Bring fOvr keyboard to life today with 

HfBJBfl 



a 



99 



Q 

Bankcords wek 



DISCOVERY BAY 
SOFTWARE CQ 

P O Box 464 Port Townsend. WA 96368 




HISPED 

TAPE OPERATION 

2KB»ud PLUS 
for the TRS-80™ 

• Save, verify and load programs up to 
4 times faster than normal 

• Save, verify and load array data up to 
30 times faster than PRINT* 

• User variable hardcopy formatting (3 
output routines work with most 
printers) 

e "HISPED" is a machine language 
program (not a hardware add-on) 

e 2 copies plus a free basic test program 
supplied on high quality cassette — for 
level 2, !6K,32Kor48K. 



Write for full specifications or send 
$24.95 (ck or mo) + $1.00 P/H (Calif, 
residents add 6% sales tax) 



PALOMAR 
SOFTWARE 

170 S. Palomar Dr. 
Redwood City, Ca. 94062 

• 22a 



•TRS-80 it a ragialarad trademark ol TANDY CORP." 



**SPECIAL**SPECIAL** 

TRS-80 ADD ON DRIVES 

IMMEDIATE DELIVERY 



SINGLE SIDED $225.00 
DOUBLE SIDED $345.00 



COMPLETE SYSTEMS 
SINGLE SIDED $365.00 
DOUBLE SIDED $485.00 

INCLUDES 
MINI DISK DRIVE 
FUSED POWER SUPPLY 
VENTED CABINET 
CABLE 

90 DAY WARRANTY 
FACTORY ASSEMBLED 
FACTORY TESTED 

THESE ARE NEW 5" FD's 



I 



2 INTERFACE, INC ^« 

20932 CANTARA ST 
CANOGA PARK, CA 91304 
(213)341-7914 

VISA AND MASTER CHARGE ACCEPTED 



^Reader Service- see page 162 
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K = ABSIX + Y) 0094 


K = X + Y 


0076 




L = ABS|K) 


0074 

01S total 


1 K = ABS(iA(Xi) 0114 


K : A(X) 


0086 




L = ABSlKi 


0074 

016 total 


LETK = ABS(X*Y> 007 


LETK = X*Y 


005 




LETL = ABS(K. 


005 
01 total 


Table 10: Execution time 


comparison of 


compound and 


decomposed statements. 







reduce their execution time. 
Table 10 gives three examples. 
In each of the cases, a single 
compound statement is re- 
placed by two simpler state- 
ments that produce the same 
result. As the execution times 
clearly show, using a single 
compound statement is con- 
siderably faster than using two 
simpler statements. 

While it is not fair to say that 
this will always be the case, it is 
certainly something that you 
should investigate when devel- 
oping your programs. 

BASIC Variations 

As a final project in my in- 
vestigation of Level I BASIC, I 
decided to examine the behavior 
of the language when used in 
ways not documented in the 
Level I User's Manual. It often 
turns out that there are quirks in 
a language, which you can use 
to your advantage if you can find 
them. 

The first statement I looked at 
was the FOR statement. A typi- 
cal form of this statement is: 

FOR I = 1 TO 100 STEP 2 

In this example, the start in- 
dex, end index and step size are 
all numbers. I wanted to know 
what would happen if I used 
something other than a number, 
and I was pleased to discover 
that I could replace any or all of 
these numbers with either vari- 
ables or expressions. 

For example, the following 
statements will execute proper- 
ly: 

FOR I = A TO B STEP C 
FOR I = A + 3 TO ABSfKM) STEP RND<5) 

This is very useful in program- 
ming situations. One example is 
a general purpose subroutine 



that can be called and supplied 
with the particular parameters 
to be used in its loop calcula- 
tion. The use of variables or 
logical expressions can be ex- 
tended considerably beyond 
what is described in the manual. 
It is possible to use logical ex- 
pressions to define Boolean 
variables such as: 

X=(A> = 5) ' (B<=7) 

It is also possible to use 
"mixed mode" expressions, or 
expressions in which logical 
tests are used with other vari- 
ables. For instance: 

SET({X>Y)'32 +2,42) 

is a valid expression. 

In the expressions ON K 
GOTO and ON K GOSUB, I found 
that if K is a negative integer the 
expression will not work. How- 
ever, if K is zero, or if K is a 
positive integer greater than the 
number of parameters in the ex- 
pression, the first parameter will 
be selected. For example, in the 
expression: 

ON K GOTO 100,200,300 

if K is zero or if K is greater than 
three, the statement will trans- 
fer control to line number 100. 1 
tried a sample program which 
includes multiple statements on 
the same line as a conditional 
test. The program line I selected 
was: 

IFX = " THIN A = 0: B = 1:C = 2 

In running the program with 
several values for X, I found that 
if the test evaluations were true, 
all the remaining statements on 
the line were executed; while if 
the test evaluations were false, 
all the remaining statements on 
the line were skipped. 



This might be very bother- 
some, but It can be useful in pro- 
grams that require multiple ac- 
tions after some decision. Many 
interesting variations of pro- 
gram statements are possible 
as a result of this feature. For 
example: 

IFX = 1THEN A=1.B = 2:IFY = 1 THEN A 
= A + 1: B = B-1 

will set A = 2and B = 1, if X = 1 
and Y = 1 or A = 1 and B = 2, if 
X = 1 and YOl A.B are un- 
changed if X01. 

One final interesting result 
that I found was that in a pro- 
gram line which includes a 
PRINT statement, if the final 
character on the line is a quote 
the mark can be eliminated, 
thereby saving one byte of 
storage. 

This means that the following 
program lines will produce the 
same result: 



PRINT "NO FINAL QUOTE NEEDED" 
PRINT NO FINAL QUOTE NEEDED 



Level I Guidelines 

Some of the above results 
have shown you how to con- 
serve memory space, while 
others have shown you how to 
increase speed, usually at the 
expense of program size. You 
should make the tradeoffs you 
feel are necessary in your own 
applications. It should be possi- 
ble to obtain the benefits of both 
reduced program size and in- 
creased speed if the "80/20" rule 



of programs applies in your 
case (i.e., 80 percent of the exe- 
cution time is spent in 20 per- 
cent of the code). 

Following is a summary of 
some general guidelines you 
can use to increase the perfor- 
mance of your programs. 

1) Avoid unnecessary use ol paten- 
theses 

2) Use the LET statement in assignment 
statements. 

3) Use FOR-NEXT loops as much as 
possible without tests tor exiting the loop 

4) Use FOR-NEXT loops on a single line 

5) Avoid unnecessary statements within 
loops. 

6) Use variables in frequently evaluated 
expressions rather than constants or array 
elements. 

7) Use compound statements rather than 
sequences ol simpler statements. 

81 Use the random function with a zero 
parameter where feasible. 

9) Where possible, use conditional 
statements which evaluate false mosl ol 
the time. 

101 In arithmetical expressions use 
multiplication operations ralher than divi 
sion operalions 

As I have noted, these items 
are strictly guidelines: Consider 
them along with the various tim- 
ing results I have presented. 

I have applied some of these 
guidelines in Listing 7a which 
was recoded in Listing 7b. The 
execution time for the first pro- 
gram was 47 seconds. Using the 
recoded version, the execution 
time was reduced to 17 seconds, 
a reduction of almost 64 per- 
cent! 

While results such as this 
may not be possible in every 
case. I believe that the savings 
you can attain are well worth the 
effort. ■ 



10 A(0)=1 

20 FOR I = 1 TO 500 

30 X = (1/6.28) * A(0) " I 

40 IF (((X - A(0)/100) > .0001) THEN X = 6.28* X 

50 A(I) = X 

60 NEXT I 

Listing 7a: Sample program for use in applying Level I BASIC 
programming guidelines. 



10 


P = 6.28 


20 


K = A|0|/P 


30 


L = A(0| + 5 


40 


M = 1/100 


50 


N = .0001 


60 


FOR 1 = 1 TO 500 


70 


LETX = K*I 


B0 


IF(X-L) - M>NLETX = P-X 


90 


LET A(I) = X 


100 


NEXT I 



Listing 7b: Recoded version of program shown in Listing 7a. 



104 • 80 Microcomputing, June 1960 




AUTHORIZED 



Radio /hack 



DIALER A301 



COMPUTER SPECIALISTS 



10% 

DISCOUNT 

Off 

List 

64 K 1 Drive 
$3499.00 




Popular 16K Level 1 1 System $ 722.00 

26 1145 RS 232 Board 84.00 

26-1140 "O" K Interface 254.00 

26-1160 Mini Disk 424.00 

26 1171 Telephone Modem 169.00 

Fast 100 CPS Centronics 730 Printer 675.00 

Highly Reliable Lobo 5' a" Drives 375.00 

Versatile Lobo Interface, 8" Drives 

and IMI Hard Drives Call For Prices 



15% 

DISCOUNT 

Off 

List 

4K Level II 
$527.00 



No Taxes on Out Of 
Stale Shipments 

Immediate Shipment 
From Stock 



MICRO MANAGEMENT SYSTEMS, INC. *n Full Factory Warranty 



DOWNTOWN PLAZASHOPPING CENTER 

115CSECONDAVE.S.W. 

CAIRO, GEORGIA31728 

912-377-7120 



on All Items Sold. 

VISA, Master Charge 
and COD's, Add 3% 



STATIC ELECTRICITY 

YOUR BIGGEST ENEMY!!! 

ST A TIC IS THE MAJOR CAUSE OF 
PROGRAM AND DATA LOSS 

Compuguard 2000tm can help eliminate 
static problems now! Compuguard is spe- 
cially formulated to reduce static electric- 
ity in all types of carpeting. You simply 
spray Compuguard on carpeted and fabric 
covered surfaces near your data process- 
ing equipment and Compuguard immed- 
iately goes to work eliminating trouble- 
some static. 

You can't afford to be without the protection 
Compuguard 2000tm will give. Before you 
lose another program, ORDER TODAY!! 
Your Compuguard 2000tm Starter Kit, at 
the low introductory price of $12.95, in- 
cludes a half gallon of Compuguard 200Otm. 
spray bottle and complete instruction. 
YOUR SATISFACTION IS 100% 
GUARANTEED OR YOUR 
MONEY BACK!!! 

SEND NOW - Your Check or 
Money Order for $1 2.95 per Kit With Your 
Complete Return Address To: 

Woodland-Hafner Associates t^230 

Research Building 

444 N. 3rd Street 

Philadelphia, PA 19123 

OR CALL COLLECT FOR 

INFORMATION (215)928-1691 

Dealer Inquires Invited 

Master Charge or Visa Accepted 



WORD 

Processing 



in 



BASIC 



ULC 



IS 



NUM 

TERM 
APOS 



UPPER /lower case that 
fully compatable with 
Radio Shack's kit $4.95 

Listing without line num- 
bers for the final 
copy. $4.95 

No more line listings that 
run off the page $4 gc 

Allows BASIC to save text 
as program files $4.95 

"WIZ" ® UT manua ' on word proc- 
essing with BASIC $4.95 

These programs run on any Level II 
cassette or disk system and can be 
turned on or off from BASIC. 
They are distributed on cassette tape 
with instructions. 

SPECIAL OFFER 

ALL 4 programs plus the Manual for 
only $14.95 



Professional Data Corporation ^237 

100 Broadway 

North Haven. CT. 06473 VISA/ 

(20.1)2.19-7671 MASTERCARD 





for your 
TRS-80! 

THE SPOOLER separates ihe logical f una ion of in- 
put /output operations from ihe physical fund ion of 
the same input/output operation. The processor and 
printer can function independently of each other. As 
a result, typical commercial applications run 
nearly TWICE as fast. 

THE SPOOLER will fit into your configuration— no 
required amount of memory or buffer space. The 
distribution disk provides 40 distinct versions of THE 
SPOOLER,20 for use in a 48K system and 20 for use 
in a 32K system 

THE SPOOLER requires no modification to your 
user application program. 

Price: $100. Add $4. for credit cant orders. 

Add $5. for C.O.D. orders 
Documentation available separately for S10. 
Model II version now available. 

Phone (513) 891-44% or write: 

Snapp Inc. „« 

M® ©QTJpGScSft© JftfvQft ©fifty© 

'RS«0 •• • itMtman o> tn* *»*o Sotct Division oi find. Coocxti iw 
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GENERAL 



Your neat graphics 

can get shot to ribbons with CHR$(23). 



Double Size Graphics 



Bertram Thiel 
159 West Main St. 
Frostburg, MD 21532 



It's funny how one thing leads 
to another in computing. I 
start adapting a hangman pro- 
gram and end by PEEKing, 
POKEing and performing some 
fancy logic that has nothing to 
do with spelling. 

While transcribing a hang- 
man program into my TRS-80 
Level II machine, I decided that 
the meager graphics in the 
original needed some embellish- 
ment, like sketching the figure 
and gallows, followed by a rope 
dropping down and the head 
moving to one side with the 
word "snap" appearing next to 
it. 

Simple Garbage 

That's simple enough, but I 
am using the double-sized char- 
acter width for greater legibility 
on my 9-inch monitor with the 
command: 



PRINT CHR$<23) 

That's where the trouble 
begins. I have written the 
graphics part using SET(X,Y) 
and a PRINT® for the word to 
appear near the head, but in nor- 
mal 64 character mode. When I 



insert the CHR$(23) at the be- 
ginning and run it, all I get is gar- 
bage, and the PRINT® line fails 
to appear. 

Extensive debugging fails to 
show anything of importance, 
except when I eliminate the 
CHR${23), everything works fine. 
It is also apparent that once you 
are in the double-width mode, 
the only way to get out of it is to 
clear the screen with the CLS 
command, erasing anything on 
the screen. Radio Shack gives 
no information on how to re- 
store single width graphics and 
letters without erasing the 
screen. 

The article, "Hidden Codes 
and Missing Chips", by Patrick 
and Leah O'Connor (80-Micro- 
computing, January, 1980) 
starts me on the way to a solu- 
tion when they describe how 
double mode works in hardware. 
I try OUT256.0 and OUT255.8 to 
go back and forth between the 
two modes, but it is too quick. 
The OUT command does not 
latch, so when it is finished the 
double mode reverts back to 
what it was before. 

Putting the OUT command in 
a delay loop helps, but this is im- 
practical. Somewhere there has 
to be a bit that is flipped and 
used as a reference to change 
the bit No. 3 on the output port 
when it is finished. 

To find it, I have to get my feet 
wet in the swamp of PEEK and 
POKE to examine the several 
hundred addresses of reserved 
RAM that Radio Shack does not 



explain. 

Since some byte has to 
change when going from CLS to 
CHR${23), I try writing a short 
program to test RAM within 
range of addresses, compare 
the contents before and after 
the conversion and store any 
positive results for display at 
the end of the run. 

Listing 1 does just that, stor- 
ing the contents of memory in B 
and C, then comparing them 
and storing those that changed. 
I dimension the arrays to 12 
places which, as it turns out, are 
more than enough. Try the pro- 
gram and specify memory loca- 
tions starting at 16384 and end- 
ing at 17128, which is the zero at 
the beginning of Program Text 
(see the T-BUG manual for more 
detailed information). 

The results show that there 
has been a change in the cursor 



location, and six other loca- 
tions in reserved RAM. The one 
that stands out and says, 
"BINGO!" is location 16445, 
which shows a zero in normal 
mode and an eight (or binary 
00001000) for data pin No. 3 in 
the CHR$(23) mode. 

Now all I have to do is POKE 
16445,0 to convert back to nor- 
mal graphics and character size. 
As far as I can tell, POKE 
16445,8 is equivalent to PRINT- 
CHR${23). 

Switching back and forth be- 
tween normal and double mode, 
it is soon apparent how the 
thing works. 

Even Numbering 

First, the PRINT®, in double 
mode, only works for a word 
starting at an even-numbered 
position. If you are in double- 
width mode and type: 



10 


REM ADDRESS COMPARE FOR TRS-80 


20 


REM 6 THIEL 1/05/80 


30 


DIM Dl (12) ,02(12) . 03(12) 


A0 


INPUT "STARTING ADDRESS";A1 


50 


1 NPUT ' E NO 1 KG ADDRESS" ; A2 


60 


LET A-A1 


70 


CLS 


80 


B-PEEK(A) 


90 


PRI NT CHRS (23) 


100 


C-PEEK(A) 


1 10 


IFB<>C THEN G0SUB 200 


120 


LET A-A+1 


130 


IF A<A2 THEN 70 


140 


CLS 


150 


PRINT "AD0RESS", "NORMAL "."DOUBLE" 


160 


FOR 0-1 TO 12 


170 


PRINT 01 (D) ,02 (D) ,D3(D) 


1 80 


NEXT 


190 


STOP 


200 


J-J+1 


210 


01 (J)-A:D2(J)-B:D3(J)=C 


220 


RETURN 




Program Listing 1. 
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The world's most popular microcomputer, with 16K of 
memory and Level 11 basic for only $675, complete 
with full 90 day Radio Shack warranty. 
We accept check, money order or phone orders with 
Visa or Master Charge. (Shipping costs added to 
charge orders). 

Disk drives, printers, peripherals, software & games. . . 
you name it, we've got it 
(both Radio Shack & other 
brands). Write or call for 
our complete price list. 

^145 




ELECTRONICS 
MART, LTD. 




AUTHORIZED 
DEALERSHIP 



Radio /hack 




TRS-M is a registered trademark of TANDY CORP. 

SYSTEM 
EXPANSION 

FOR THE 

TRS-8(T 

AT _ 

A/-A' 5 \ PC BOARD * 1 
9Q37 |_ USER MANUAL J 






2 rsii* 6 

•tt:8!:JJ" 

m 




• SERIAL RS232C 20mA I O 

• FLOPPY CONTROLLER 

• 32K BYTES MEMORY 

• PARALLEL PRINTER PORT 

• DUAL CASSETTE PORT 

• REAL-TIME CLOCK 

• SCREEN PRINTER BUS 

• ONBOARD POWER SUPPLY 

• SOFTWARE COMPATIBLE 

• SOLDER MASK.SILK SCREEN 

LNW 

RESEARCH ... 

8 HollowgUn St. Irvine CA 
714-552-8946 92714 



- TO ORDER 

P.O. Box 16216 Irvine CA 92713 

Add S3 for postage and handling 
CA residents odd 6% sales lax 
Signature 



32 EAST MAIN • MILAN, MICHIGAN 48160 • (313) 439-1508 



NIXON'S 

FAVORITE 

TAPES 




BLANK CASSETTES 
PREMIUM GRADE C-20'S 
5 SCREW HOUSINGS 

OQeea. 10/$8* 100/ $75* 
w ^ ORDERS UNDER $20 

ADDS2- IN OHIO ADD5-1/2%TAX 



DATA PRODUCTS 

P.O. BOX 17176 "» 
CLEVELAND, OHIO 44117 



ltS...SOFTWARE 

MINIVENT 

MINIVENT performs minimal inventory control for 
the maximum number ol inventory items. It is written 
for the TRS-80* 16K Level II in BASIC, with built-in 
machine language routines for fast searching and 
data tape input. MINIVENT can handle up to 1400 
inventory items, showing parts on hand, order 
quantity, and last order day. (It does not permit 
descriptions or prices.) 

MINIVENT can search for. add, or delete items, 
and change quantities or dates. MINIVENT will 
display items which need to be ordered, and slow 
moving items. With optional printer, MINIVENT can 
print an order list and full inventory. 

The full price $49.95 includes two versions of 
MINIVENT (8 or 12 position part no's) and complete 
documentation. 

Other TRS-80 Its.. .Products 
COMPU-DIET ■ Weight Loss System 

Behavior Mod, Forecast, Database 
SE ■ Search Entry Retrieval Program 

Machine Language, 12 to 44K ASCI char. 
BASICIO - Machine Language I/O for BASIC 

Data and Programs to Tape or Disk 

Please send 

U MINIVENT 2.0 @ $49.95 LZSE 2.0 (tape) ©$24.95 

I ]COMPU-DIET1.2@$19.95l ISE3.0(dlsk) @$49.95 
I J Additional Information i 1BASICI01.5 @$14 95 

Fla. Res. add 4% Sales Tax - Total S 

□ Check/Money Order DVISA DMASTERCHARQE 

Card No Exp. Date 

Name Bank No. (MC) 

Address 



Its... Information Technology Systems 

POB 2667 Sarasota FL 33578 

•TRS-80 is a trademark ol Radio Shack, a Tandy Corporation 

• 300 



lts...SOFTWARE 

COMPU-DIET 



A computer based nutritional balancing system. 
Professional psychologists and nutritionists have 
combined with computer technology to create 
COMPU-DIET: a program that allows you to spend 
minutes a day at your TRS-80* and lose lbs per week. 

Each day you and your family use COMPU-DIET, 
your bodies will come closer to healthful equilibrium 
— using natural foods that you like With this new 
scientific technique, your computer will help you 
create a unique metabolic balance that guarantees 
optimal weight loss. Finally, the ultimate weight loss 
diet; one you stay with and lose all you want — 30. 
40, 50 lbs. or more. 

COMPU-DIET is written in BASIC for the TRS-80 
16K Level II The full price of $19.95 includes 
behavior mod program, nutrition data-base, weight 
forecast program, and Weight Loss booklet 

Other TRS-80 lt8...Products 
MINIVENT • Minimal Inventory Control 

1400 Items, 16K Level II 
SE - Search Entry Retrieval Program 

Machine Language, 12 to 44K ASCI char 
BASICIO - Machine Language I/O for BASIC 

Data and Programs to Tape or Disk 



Please send 

I ] COMPU-DIET 1.2 @$19.95 I I SE2.0(tape) ® $24.95 
I 1MINIVENT2.0 @$49.95i ISE3.0(flisk) @S49.95 
I I Additional Information I J BASICI0 1.6 0*14.95 

Fla. Res. add 4% Sales Tax - Total S 



□ Check/Money Order LI VISA (J MASTERCHARQE 

Card No Exp. Date 

Name Bank No. (MC) 

Address 



Its... Information Technology Systems 

POB 2667 Sarasota FL 33578 

•TRS-80 is a trademark ol Radio Shack, a Tandy Corporation 
«V »*301 , 



*• Reader Service — see page 162 
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Character 





Division 

k/2 

(» ♦ 1V2 

(m*i»;2 



rtomainoar 



Division 
« 2 2 

i> ♦ iy2tf 
1/2/2 
(x* 1)013 



Romainoor Action 



no 



I = »-1 
» = « - 1 
« = x-2 



Tao/e 7. Logic chart. 



PRINTa 100. HELLO 1 PRINT r« 165. 
"HELLO 2' 



you see only the first line 
printed. Now enter: 

POKE 16445.0 

and the other line will appear. 
Note they are both double 
spaced. Double-width mode in- 
puts characters every other 
position in memory, and if they 
don't start in an even position, 
you'll never see them. This can 
be surprising when loading the 
screen memory with a message 
or graphic in double-width, and 
you have it suddenly appear by 
leverting back to the normal 
mode. 

If you have printing on the 
screen in normal mode and 
you POKE 16445.8 or PRINT 
CHR$(23). you see only one half 
of what was there before. Also. 
the whole screen is shifted right 
one double-character width, 
which is the clue to under- 
standing how double mode 
characters and graphics work. 

Remember that you can SET 
any X position between and 



127. but in double mode all you 
have available is every other pair 
of X memories. If we look at the 
first four numbers, 0,1,2 and 3. 
you'll see what I mean. 

Type in SET(0,30) and you get 
a block in positions zero and 
one (in double width mode). 
SET(1,31) occupies screen posi- 
tions two and three on line 31. 
SET(2,32) and SET(3,33) though 
they do reside in video memory, 
are not displayed on the screen. 
POKE 16445,0 and you see 
them; POKE 16445,8 and they 
disappear again. To draw in dou- 
ble mode graphics, you have to 
take this into account. 

The only thing left to explain 
is how to do it easily, especially 
if you are graphing. Studying the 
characteristics of the numbers, 
it becomes apparent that each 
had a couple of characteristics 
unique to its own group (multi- 
ples of four). Each time you 
divide by two you have a result 
that either does or does not 
have a remainder, with a one ad- 
ded to compensate for odd num- 
bers. 

Table 1 shows how a position 
can be evaluated and. when 



true, what action will be taken to 

set the proper memory bit to 
give a continuous line. 

Subroutine 

The subroutine starting at line 
1000 in Listing 2 uses these 
characteristics from the table 
with the integer function and the 
logical AND to determine if 
there is a remainder after di- 
vision. 

Note that a fourth decision 
line does not exist since, if the 
first three are not satisfied, then 
the X must be of character three 
type which requires a displace- 
ment two positions to the left. 
Special consideration is given 
to zero in line 1020 and an over- 
value check in line 1010. 

If you enter the program as 
shown and run it, you get a nor- 



mal graphics lino from (J.Q tu 

47,47. Insert: 



15 PRINTCHR$(23) 

and note the discontinuous line 
on a new run. To activate the 
subroutine, put in the line: 

35GOSUB 1000 

and you correct this problem. 
Study how the subroutine is 
used and insert it whenever you 
decide to use double mode in 
graphics. 

With the knowledge of the 
PRINT© idiosyncracies and the 
unusual use of graphics mem- 
ory storage, many unusual and 
useful effects can be accom- 
plished.! 



1 


REM DEMONSTRATION PROGRAM WITH GRAPHICS 


2 


REM SUBROUTINE TO CORRECT FOR CMRS(2J) ' 


3 


RE" B THIEL 1/05/80 


10 


CIS 


20 


TOR Y-0 TO kj 


JO 


X«Y 


(o 


SET (X ,v) 


50 


NEXT Y 


-:: 


;;t: t: 


999 


END 


1000 


«EM SUBROUTINE ID EVALUATE X POSITION IN SET COMMAND 


1010 


IF X>127 PRINT "X IS OVERVALUED": STOP 


1020 


IF 1-0 RETURN 


1030 


A-X/2 


10h0 


B-A/2 


1050 


C-(X*1)/2 


1060 


D-C/2 


1070 


lF((A-l«T(A))-0) AND ((»-INT(B))-0) THEN RETURN J 


1080 


IF( (C-INT(C) )"0) AND ((D-IMT(D))>0) THEN X»X-1:AETURN 


1090 


IF((A-INT(A))-0) AND ( ( B - 1 NT ( B ) ) >0 ) THEN X-X-1:RETURN 


1 100 


X-X-2: RETURN 


1110 


STOP | 




Program Listing 2. 



COMPUTER FORMS 



• 240 



I 61*^429 7*2,2 



MICROCOMPUTER 
PAPER PRODUCTS 



-ALL ITEM* IllOW: BLANK, WHITE, FANrOLD, 

TBACTOB (PINFEED) PAPER STOCK 

POBTCABD, Q»L. CARD BTOCKi 4"a»" (7" carrier 

wKihl I 4" EXTBA MAIIOIN POB » I 1 H I »" CAIM 

(Mt«n P.O. Mm U TMikMI r.«.lr.«.«t .1 

!»• c«r«i . . MHIM.ird . . pa.aa. I INlll ll . . • 11-W 

ADDBEM LABEL* IBM" ■ Ml', I laBata airaat. . 

Il IM M BMMltlVt 

»•>•**>> ■ ■ «1.«I»»U»«U. . HHimliMi. . •*.*« 

PAPEBi •■! >"ill" !••> mall w i t" parfarata* 

■MPfaBal 

«aa ahaaM . - HUN itaa th««n .•if.aa 

»ia* ■*»«!• . . f i* •« 
PAPEB: 14-7 •"■II" <■•■ pari _.r ( i..) 



Caah Or dar: Inctada »1 Ear •hlpsl ng 

char«aa, and t ha iimm will »a alllad with 

jr*ajr »rd«r. Cr adit Card 

Orator: Shipping chirm 

will k* addad t • jiar 

•rater. Band all cradlt 

card Inlarmatlan. 



CBMPUTEB POBMB. MM CABIBOU. 
•TTIVENSVILLE, Ml *»II7 




•m pri*n« call mump Irmm UP* atellvdry" 



', C OV1PIETE STORES IN ONE! 

COMPUTER CENTER 



features a complete line of 

SOFTWARE 
and BOOKS 

for the 

TRS-80 

write for information 




the coup-case 




A1TAO* llftt CAKIKMCAIIIKIPK. AMO rftOTtCIIXQ IM« I R* M 

irm».jTr« mioh ouaiitt iuOQmv conitbuttion onrCAteroa 
(.unruttii hhwoiiwii. fApt kionix* ua i»sh nam* uc 
om> rA»r >«.» winumi • iim , .t»» iTACt ro» *oor« on mm 
rajntia. -•««■ a nttu tuatMuvt njua-WM iiwusc winv 
•mint rirvrn eOMNH ' «'«■ vi» unaAtf iiivh cam at 
■rriAcio Ann locmo ioo mu«m annul oiaconmcuxu 
run opiiowai «f nnfMiiAlriit COMVMH »"" 'V»»i »Nto a 

MOfaTOB "AAirtdlt UHmCtlHAA. I . «..< 04 1IIO* 

at not 



MUOI 'MIOC 
»%JOi '■» •) «|| H.i 

iuui m "iM ig 

Mill l »»».»«.. M (m 
t:C»0 <A»lt»-n A ll— M 






i» 



COMPUTER CASE CQMPflNV 

5BSO INDIAN MOON© CT . COLUMBUS. OHIO 
(•MISM94B4 4121) 
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EXPANDED MAILLIST SYSTEM 



e«' in \,f4 test.na C.t.C.S m 
available 'or th« TRS 80 »' 
lysrem requires a single ejisl 



By Harry Hop.l 

After 18 month-, ot development and one 
re.easev the most complete mjilmq !.»♦ systen 
«peoal lo« .ntroductory pnee o' $59.95. The 
3?« .nter-ace and a printer 

The Expanded Maillist System ufiluej an exclusive machine lanquaqe 40" 
«hpch allow, 'or the sort o' 500 records by narnt state or jip code in 5 seconds! 
The system has complete error trappmq and recovery such as automatically savinq 
the <il« »h n memory space is full and remain. nq ,n the system under a Me. not 
'ound condit on. The system also has multiple, die and reorqan.jetion capabilities 

Ihf l ilo«.inq (u'ly '.nled proqrams are mended in the E.panded Mail's' 
System. 

I. DUPLICATE CHECKING— Oecls <or duplicates as you enter and also has 
a separate Mitme that will purqe an entire 'le ' dup : <cate names with a smq'e 






• 



2. FILE MAINTENANCE— Used for adding deleting and complete ed>' 



3. LABEL AND LIST PRINTING — Ai o~s selective printing o* labels or li 
>n ,p to a ten d-qit key. Also has full suppression capability, f-o' •■ample 
you want a list o' everyone in your file with a JAN' in their key code eice 
those w.th an 80' you shou'd select JAN' and suppress '80'. 

4 STATUS ANALYSIS — Th s p.oqu-r * qenerate statistical reports on I 
percentages of names with certain beys or reqione' breakdown. Very use'u 1 
last -siue notices on abe's 

5 FILE REORGANIZATION— Vv.tr rh ■> program »o u m» v reorqanue yc 
Lies mto spec'ic a pha or r.p code ranges for true mult, file capability. 

a. MULTl PURPOSE LABEL UTILITY— Provides formatted printing of lab 
for special app icat.ons. 

Eipanded Maillijt System on diskette with manual $59. 95 
Manual only $3 with full credit towards purchase. 



AMCT-80 



tt-i 



By Earl Peterton 
Th.s automatic morse code teacher 'or the 16k leve' 2 TRS 80 
mo'se code proqram that will automatically let your option) slow down or s 
up depending on yo»r proficiency to receive code. It includes 9 preprograr 
progressive ciercises. Fully variable speed up to 30 w.p.m. 1-9 character 
qroup and I 9 spaces between qroups are user selected options. The send I 
allows 'oi keyboard entry concurrent to sendinq by utilijinq a 256 byte 
buf'er. There are 9 user programmable messages of 64 characters each. 

This machme anguaqe proqram is truly the morse code teacher of to"w 
today! - 

^a-a^Bhk AMCT-80 on cattette with full documentation $14.95 
1 3 Dealer inquir,., In.it.d. 



*S3* 



COST EFFECTIVE COMPUTER SERVICES 
04 1 U.e — P. O. Box 3543 Grand Junction, CO 8 1 502 

(303) 243-3629 .„ 



/> 



% 



Corwed 
Sortiuexx 



•CANNED SUrTUAKr 4 



>• SOFTWARE! 

** Yea! Quality Software for the TRS-80 is now 
written & available. BCC is pleased to be able to 
present some very fine software now with even 
more available in the very near future. Also we 
develop custom designed software for your 
every need. Write us for a FREE price quote. 

♦ TRS H0 la a trade mark .>l I •»• rUdl.i Mid. K in. o! Ui<" (.>ri> 

For Software Think BCC -^S' 



o Mail Base 80 

A RANDOM ACCESS proari 



eqiir 



HOD IMRequlr 

.ram wtlich keep* tra 
cc acceaa of Information 
na bill* 4 toewrro* produ 



drivel) $69.95 

drlvea)S12».»5 
nilmiled number at entries. Plul 
ir. Today, list all people who 
In ilp-code order. EXCEL1.EKT! ! • 



OOilDOliVGry _WC II (UQUIRES 4SK 4 4 drlvea) writ* lor price quote. 
A nun tot the 10a. Thla ayatem handle, rverylhlnt (or the heelln» Indualry 



O VendOT NOD I (lUoulraa 4K 4 ? drlvea) SM.»«. 

Thla projram leepa track of an unlimited number (6)0 per dlae) of vendo 
direct acceaa of coded information by vendor number. 4 alao permlla ace 
vartoua other flelda. 



AUowa 
°y 



V wCigs at. For Supplies Think BCC -^^O/ 
o Disks & Tapes » !•»* ««««.«. »» »r.=d m.v, no m P ,„. »..> 

8 Inch dla«ette\ J» Brand Sb4.« (Box of 10) SV'Verballm $».»J (to* of 10) 

Caaeettea Vary Hljh Quality 516/doi ClO'a. ADO '■ STAC atackable caaaette 

holdera. Each ho Ida ■ caaaettea. Sl.Hea 

O Printers TtM fabuloua tUVSE 2 PHllCTta ■»•. .har ASCII with Tractor Feed 4 2K 
•offer. Thla printer juat can't be beat!!! 5649.00 (I for SW0O.OO) 
REC0MD1T10KEB CEKTRON1CS I0M (1)0 chara/sec ! ! ! ) $1)00.00 



Master Char** E.pD.le. 
Visa SiRiulure _ 



ORDER NOW! All pro»rrams come on quality cassettes. Programs are available on diskette (or an 

additional charge of 17 00 per order NYS residents add We Check bone-, of items heme; ordered 

* of items ordered Total amount enclosed I All items must be prepaidl 

Bourrut Consulting Corporation 

. B1Fr-»ndtyRd Smithloujn.nv 11767 »>57 



AN INVITATION 



July 1, 1980, the cover price of KIl.OBA LD MICROCOMPUTING 
is going up lo $2.95. Inflation has finally hit. BUT, we would like to 
extend you an lSVITATlON TO BEAT ISFLATIOS . . . SUB- 
SCRIBE OR RENEW your present subscription from now until July 
18, 1980, A T THE OLD RA TES. 

Don't miss an issue of the industry's most complete and informative 
journal by letting this SA VINGS pass by . . . fill out the coupon 
below today. This price increase makes all other Kilobaud Microcom- 
puting subscription offers void on July 18th ... so hurry and BEA T 
THE 18% IN FLA TION. 




TO BEAT 



INFLA TION 



,OF COURSE, I'LL BEAT INFLATION . . . 



□ New Subscriber □ Renewal (please affix an address label from your most recent magazine) 

L; 1 year/$ 18.00 □ 2 years/$30.00 □ 3 years/$45.00 

D Payment enclosed Bill: T. Me D Master Charge D VISA 1 I Amerex 

Card # Expire Date 



Signature 

Name/Label 
Address 



Interbank #. 




State. 



Zip. 



Canadian— SI 8.00, 1 year only.US funds. Foreign— $23. 00, 1 year only, US funds. Please allow 6-8 weeks for processing 

THIS CARD EXPIRES JULY 18, 1980 
KILOBAUD MICROCOMPUTING PO BOX 997 FARMIM.DALK NY 11737 3( 
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SOFTWARE 

P.O. BOX 521 Lowell, MA 01853 



7 • Memory based printer spooler, 
overlap processing and I/O. 

2 • IBM based terminal driver. 

EBCD and correspondence 
code. Full ASCII character set 
with overstrikes. Scripsit 
ZAPS. 

3 • Disk timing program. 

Meter Type numerical and 
statistical screen displays. 
Very easy calibration of all 
type drives. 

4 • Cassette test programs. 

Writes test data to tape, then 
displays all errors on screen 
Use to check all facets of 
cassette operation and dupli- 
cation quality. 

SEND FOR FREE FLYER 



— The bottom line — 

COST: $9.95 Each + .75 postage 
MA Orders + 5% tax ^235 



FINALLY! 

PROFESSIONAL 

PROGRAMMING 

TOOLS FOR EVERY 

BASIC PROGRAMMER 

Do you write Basic programs with your TRS- 
80?* Then you know there are times when 
you need to: 

• RENUMBER part or all of your program. 

• DELETE many lines with one command. 

• APPEND common routines from tape. 

Now, with PROgrammer, you can do all 
these things! And COMPRESS your pro- 
grams to speed execution and reduce size. 
And MOVE blocks of lines within your pro- 
gram quickly and efficiently. Moreover, load 
PROgrammer just once, and these com- 
mands are a/ways available! 

PROgrammer: S25 on cassette with complete instructions, 
level II required Please indicate memory size with order 
Calit. residents add b" •■ sales lax. 'TRS-80 is a trademark of 
Tandy Corp. 

Rational Software ™ 

963 E. California Pasadena, CA 91106 

• 307 



SUBDIVISION GEOMETRY 

MANUALS 

fOR MICROCOMPUTERS 

Includes complete listings of programs 
used in engineering practice since 1977. 
plus DOCUMENTATION & INSTRUC- 
TIONS for putting these programs on 
YOUR OWN MICRO. 



QIm'Mimm (>io%im:<\ 5/'/ 

(ft ( IXIHtllNMI (.IDMl lift /'/ 

0i'im>IiIi (..mil A) 

<£)( nai CriOftM HIV fO 

(?) l<A<li\l Snkioi i At 

0( t mi SlAkiix i At 



IoiaI 



SI XI 



SAVE $ 31.°° 

All 6 Manuals 
Only *99. 00 

Vis<» & Maslereharqe 
Telephone order* accepted 

DEALER INQUIRIES INVITEO 

Andrew Machen 

Consnllmq Civil Engmeei 

143 C So Cedros 
Soiana Beach. CA 
92075 ^95 

(714) 755-4033 




Let Your Computer 
Control Your Home 

Now have full computer control of up to 256 lights, appliances and 
even wall switches without special wiring. The SclTronlcs REMOTE 
CONTROLLER permits direct control of the Inexpensive BSR remote 
line-carrier switches sold by Sears. Radio Shack and many others. 



Features: 

• Controls all 256 remote switches— not just 16 

• No ultrasonic link used— prevents erractic operation 

• No BSR command module required 

• Plugs directly into your keyboard or 
Expansion Interface Jack 

• Simple to use— sample software provided 

• Attractive wood grain case 

Applications: 

• Make your entire home, business or apartment 
"computer controlled" 

• Save energy by controlling lights and appliances 

• Control lights and alarms for security systems 




remote switches not Included 



ENCASED SELF POWERED 
CONTROLLER FOR TRS-80-1 



$184. 



^-280 



Send check or money order to: 

SclTronlcs Inc. 

523 S. Clewell St.. P.O. Box 5344 

Bethlehem. PA 18015 

(215)868-7220 

Master Charge and Visa accepted. PA residents add sales tax. 

C.O.D. is accepted. 



110 • 80 Microcomputing, June 1980 



INTERFACE 



A real I/O Driver for the 
DEC LA-34 turns it into a fully working terminal. 

DECwriter Driver 



James D. Beauchamp, Jr. 
6214 Silverleaf 
League City, TX 77573 



What is better for a micro- 
computer's output blues 
than a line printer, but costs 
about the same? A printing ter- 
minal! 

After considering various line 
printers I decided the best thing 
that I could buy for my TRS-80 
was the DECwriter LA-34. Here 
was a table top printer, for about 
the same price as a Centronics 
line printer, yet was a profes- 
sional terminal as well. The only 
thing missing was the software 
driver enabling the LA-34 to be 
used as a terminal. 

Though the RS-232 port from 
Radio Shack has a DECwriter 
Driver listed in the instruction 
manual, it is only an output 
driver to be used with the 
LPRINT command. I wanted a 
real I/O driver for my DEC- 
WRITER. 

The Control Codes 

So I sat down, chained myself 
to the computer and wrote the 
Term program that Radio Shack 
had announced but not yet 
released. The DECwriter I/O 
driver is broken down into sev- 
eral sections which I have 
separated with comment lines. 
The first section of the listing is 
the control codes. 

Control A is used as a BREAK. 



The key labeled BREAK on the 
LA-34 transmits a .233 ms pulse 
which is ignored by the TRS-80. 
The computer decodes its own 
break as 01 H. This is the control 
character SOH in ASCII and is 
transmitted by the CTRL A on 
the LA-34. 

The second control character, 
S, was added because the 
TRS-80 has a habit of speeding 
off during the DOS PRINT com- 
mand. Every time I tried to list a 
program from disk, the TRS-80 
would outrun the LA-34 and I 
would lose valuable data. 

Since the DECwriter can auto- 
matically transmit an X-OFF 
character whenever its char- 
acter buffer contains over 100 
characters and an X-ON when it 
contains less than 10, 1 decided 
to take advantage of this 
feature. 

During the print cycle, when- 
ever an X-OFF is received, the 
print routine enters a tight loop 
(at label X-OFF). When any char- 
acter other than X-OFF is in the 
RS-232 data register, the loop is 
terminated. 

During normal operation, 
when the register does not con- 
tain the X-OFF character, the 
loop is ignored. The loop can 
also be entered by pressing the 
Control S during printing and 
exited by pressing the carriage 
return. 

Another control character I 
added, to prevent printing on the 
perforations of my fanfold 
paper, is CTR L or form feed. I 
added a line counter (actually 
Radio Shack added it in the line 



printer device control block, it 
just seems that they did not 
make very good use of it) and a 
routine (FORMFD) to generate 
enough line feeds to send the 
printer to the top of the page 
whenever the FF character is 
transmitted. 

I also inserted a check for the 
CTR L in the keyboard routine to 
allow the form feed routine to be 
invoked manually. 

The Controls 8 and I were 
recognized by the TRS-80 and re- 
quired no special programming. 
So that I could have the option 
of using typing paper I added a 
loop (PLOOP for pause loop) in 
the form teed routine. This 
caused the computer to pause 
at the end of each page. This 
loop responds to a flag (PFLAG) 
that is set with Control P (for 
PAUSE) and reset with Control R 
(for RESET PAUSE). 

Input and Output 

The next sections of the pro- 
gram are the Equate Table and 
the DCB initialization. Mere I set 
the values in all of the DCBs ex- 
cept the keyboard. The key- 
board is initialized by going to 
BASIC and using the SYSTEM 
command to jump to KBINIT-6 
(here I have used 65001 - see 
ORG in line 600). 

This is the technique used by 
KBFIX and is the only way I 
could get the keyboard to ini- 
tialize. If anyone else can get the 
keyboard to initialize from DOS, 
I would be grateful to hear how 
you do it. 



The next section performs the 
actual input from the DECwriter 
keyboard. It first checks the 
UART to see if it has been in- 
itialized and, If so, inputs the 
character. If FORM FEED and 
PAUSE commands are present 
they are acted upon; otherwise, 
the character is returned. The 
UART is then initialized — a stan- 
dard routine suggested by 
Radio Shack in their RS-232 
manual. 

FFTEST begins the output 
routine by checking the line 
counter to see if the printer is 
within five lines of the perfor- 
ation. If it is, the current char- 
acter is stored and a form feed is 
output. 

The computer next checks 
the status register to see if the 
LA-34 is ready to receive another 
character, then checks the data 
register to see if a control char- 
acter has been received from 
the LA-34. The possible char- 
acters are X-OFF, X-ON, CTRL P 
and CTRL R. If one of these is 
detected, it is acted upon im- 
mediately, otherwise the next 
character is output. 

After the character is output 
the computer checks for a line 
feed and a carriage return. If a 
line feed has been sent, the line 
counter is decremented and if a 
carriage return has been sent, a 
line feed is also output. 

The next section contains the 
subroutines for decrementing 
the line counter, generating a 
form feed, setting and resetting 
the PLOOP flag and a loop for 
PLOOP to wait in. 



■Reader S9rvice—see page 162 
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Program Listing 





00100 
00110 


t 




SECNRITER I/O DRIVER I 




00120 


t AUGUST 26 


1979 


JAPES BEAUCHAAP • 




40130 


t 






2318 KENT ST t 




00140 
00130 

00160 


t 






9RYAN. TEXAS t 




THIS 10 DRIVE* ALLOWS HY PEC LA-34 TO ACT AS It FULL 




00170 


TERHIML TO AT 


TR9-90. IT ALSO TAKES CARE OF THE END OF PAGE 




00190 


FOB! FEE* AM TIC LIME COUNTER 






03190 












00200 


THESE CONTROL COSES HAVE THE FOLLOWING FUCTIOM: 




00210 


CTRL A 


■■■ 9REM 






00220 


CTRL S 


•«« PAUSE - THIS IS A TIGHT LOOP 




00230 


CTRL L 


■•■ FORK FEES 






00240 


CTRL 1 


■■■ CANCEL THE LINE 






00230 


CRTL I 


'■' TAB 








00260 


CTRL P 


■» PAUSE AT EN> OF PAGE ON 




00270 


CTRL 1 


»« PAUSE AT ENS OF PAGE OFF 




00290 












00290 
00300 








00310 

00320 


»» FJUATE 7 AJLE 


% 




00330 










♦on 


00340 LIMECT 


E0U 


4029H 


;ao**£ss of the line counter 


4028 


00350 PGLNTH 


EBU 


4029H 


lAsoftEss of the page length 




00390 








:this is fron trsbos 


00E8 


00379 RESORT 


EBU 


0E9H 


:an out to this location resets 




00390 








:TH£ 1MRT. AN IN REARS THE RS-232 




00390 








; CONTROL SITS 


00£9 


00400 WITCH 


E8U 


0E9H 


;an out to this location loam 




00410 








:tne baud rate generator, an in 




00420 








: READS THE SENSE SNITCHES 


OOEA 


00430 CNTREG 


E8U 


BIBB 


:an out to this location loads 




00440 








;the CONTROL register, an in 




00430 








:reak the umt status re6ister 


OOEB 


00460 DTMEG 


EBU 


«B« 


;an but to this location loads the 




00470 








.DART UNIT HOLDING REGISTER, 




00490 








;an in reads in the recieves 




00490 








:data 


0010 


00300 CTRLP 


E9U 


0200 


;control p 


0012 


00310 CTRLR 


EflU 


0220 


; CONTROL * 


oooc 


00520 
00330 
00540 
00550 


TRLL 


EBU 


OCH 


; control l 




• DEVICE CONTROL 8L0CI INITIALIZATION ■ 


401E 


00360 




ORG 


■6414 




401E D4FE 


1)0370 




OEFH 


VISEO 




40ZS 


00590 




ORG 


4026m 


INITIALIZE U SC9 


402S 22FE 


00590 




DEFN 


SKINT 




F8E9 


00600 




OK 


63001 




F0E9 3*2840 


00610 




LD 


A.IPGLNTHI 




FKC 322940 


00620 




LD 


ILINECTI.A 




FDEF AF 


00630 


S1M1T 


XM 


A 


; INITIALIZE 


FDFO HOMO 


00640 




LD 


SE.OOOAH 


:put io in be register 


FDF3 CDOiOO 


00650 




CALL 


0006H 




FBFS 19 


00660 




ADD 


HL.DE 


;hl contains (.am io to it 


F0F7 221840 


00670 




LD 


I4016HI.HL 


:STORE f»IO IN 19 BLOCK 


FOFA C0611I 


00690 




CALL 


ISC1H 




FflfD C319IA 


00690 
00700 
00710 




JP 


1AI9H 


;return TO BASIC 




• this section 


INPUTS THE CHARACTER FROM THE KCHRITER. • 




00720 


• IT THEN CHECKS THE CHARACTER FOR CONTROL CORES AND IF PRESENT « 




00730 


» il GOES TO THE CORRECT ROUTINE. FOR INSTANCE. IF A FORR FEES ♦ 




00740 


* IS RECIEVES 


n£ CALL F0RNF9. 


IF CTRL P IS RECIEVES NE CALL » 




00750 
00760 
00770 


• THE SETP ROUTINE. ME THEN RETURN TO THE CALLING COSE. • 


FEOO 3A02FE 


9FIX 


LB 


A.IFLAGI 


;HAS UMT BEEN INITIALIZED' 


F£03 FEOI 


00780 




CP 


Olh 




FEOS C222FE 


00790 




JP 


N2.DEC1NT 


UNITIALIZE IT IF NOT 


FE08 SKA 


00900 




III 


A.(CNTREG) 


IDAS A NEH CHARACTER BEEN SENT? 


FEOA C87F 


00910 




BIT 


7. A 




FtOC 29)2 


00920 




jR 


Z.RSX 


;CLEM A AM RETURN IF NOT 


FEOE D9E8 


0O930 




IN 


A. t STARES) 


:else get men character 


FE10 F£:0 


00940 




CP 


CTRlP 


MS IT CTRL P 


FE12 CC90FE 


00950 




CALL 


Z.SETP 


;set pause flag if so 


FE13 FE12 


00660 




CP 


CTRL* 


MS IT CTRL R 


FE17 CCB8FE 


00870 




CALL 


Z.RSETP 


IRESET PAUSE FLAG IF SB 


FE1A FEOC 


00890 




CP 


CTRU. 


;is it cm l 


FtlC CO 


00890 




RET 


N2 


:if not then return character 


FEID CD9IFE 


0O9O0 




CALL 


FORHFD 


:iF CTRL L THEN FORK FEES 


fezo af 


00910 


m 


X08 


A 


ICLEM A REGISTER 


FE2I C9 


00920 
00930 
00940 


• THIS 


RET 




:m RETURN 




ROUTINE 


IS USES TO INITIALIZE THE RS-232 PORT. IT IS USED* 




00950 


• ONLY NNEN ThE flag is not SET. • 




00960 


mimHWHIimiHIHHIIIIIIHHIIIIIIIIIIIIIIIIIHIHIIIHII 


FE22 £5 


00970 


NTZINT 


PUSH 


HL 


ISAVE REGISTERS 


FE23 C5 


00990 




PUSH 


K 




FEZ* F5 


00990 




PUSH 


*/ 




Ft2S 3M2FE 


01000 
•1010 




LD 


A. (FLAG) 


:CHEQI FLAG TO SEE IF UART ANB 
;srg HAVE BEEN 1NIT 



fEZB FEOI 
FE2A 2820 
FtfC 3ED1 
FE2E 32SZFE 
FE31 D3E8 
FE33 DBE9 
FE35 E6F8 
F£J7 F604 

FE39 32D1FE 

FE3C D3EA 
f£3t DBE9 

FE40 £60? 
FE42 21C9FE 
FE45 0600 
FE47 4F 
FE48 09 
FE49 7E 
FE4A D3E9 
FE4C Fl 
FE4D CI 
FE4E El 



OIOZO 
01030 
01040 
01030 

01060 
0107D 
01080 
01090 
tillOO 
OHIO 
01)20 
0U30 
1)1140 
01130 
01160 
01170 
01190 
01190 
0)200 
01210 
01220 
01230 
0)240 
0)250 
0)260 
0)270 
0)290 
01290 
0)300 



BAUDS! 



RESTOR 



CP 


01H 


JJ 


2.REST0I 


LD 


A.01H 


LD 


(FLAG) -A 


OUT 


(RESURT).A 


IN 


A.ISHlTCHI 


m 


0F8H 


on 


04H 


LD 


(ShTIM).A 


OUT 


(CNTREG).A 


in 


A. (SNITCH) 


AkD 


07N 


LD 


hl.BDTABl 


J 


B.OOH 


LD 


C.A 


ADD 


HL.BC 


LD 


A, (Hi 


OUT 


iSNircHi.A 


POP 


AF 


POP 


K 


POP 


HL 



;restore REG ANO OUT CNR if so 

.'set flag to in9icate wit 
;«em ]7nh to beset umt 
;*em sense snitches 
ilop off loner 3 bits 
;rsts rts. rsts btr. sets mi 

:iN HANDSHAKE LATCH 

:lOM SNTN6 N/IIMGE OF LATCH 

run 

;lom umt n/snitch imge 
:set bau9 mte acc0ming to 
: snitch selection 

:LOP OFF UPfE* 5 BITS 

! point to first in baud tbl 
izero b reg 
iput offset in c 
;add offset to hl 
;lom pointed value 
;load srg u/table value 



IRESTORE REGISTERS 

; HtlHmWHHHHHtmHW IHI I II II IIIIIIIIIIII I IIII I HUm i 

:♦ check if at last of page, if so then save character am outputi 
;• a forh fee0. ase output the character. • 

:♦ ThIS routine is used by both the lpvint COIMM am THE VIDEO • 

HDRIVES ROUTINE. IT HILL BE CALLED BY <LPRINT> AM <V1SE0> t 



FE4F 3AZ940 


01320 FFTEST 


LB 


A.ILINECT) 


ITEST IF EM OF PAGE 


FE52 FE05 


01330 




if 


3 


INITNIN 3 OF END? 


FE54 C25EFE 


01340 




JP 


NZ. STATIN 


I OUTPUT CHARACTER IF NOT 


FE57 F3 


01350 




PUSH 


AF 




F:58 C3 


01360 




PUSH 


BC 


ISAVE REGISTERS 


FE59 CD91FE 


01370 




CALL 


FORflFD 


:do a fork feed if at em 


Ft3C CI 


01380 




POP 


BC 




FE3D F) 


01390 




POP 


AT 


IRESTORE REGISTERS 


FESt DBEA 


01400 STATIN 


IN 


A.ICNTREG) 


:lom umt status 


FEGO C877 


01410 




BIT 


6.A 


itest three for high 


FE62 28FA 


01420 
01430 
01440 




JR 


Z. STATIN 


:loop if mt 




• TES 


FOR CONTROL CHARACTERS ENTERED HHkE IN PRINT LOOP • 




01430 


• OF YOU DON'T TEST HERE. 


YOU MY BE STUCK IN A PRINTING LOOP • 




01460 
01470 
01480 


» FOR A LONG TIME. 


t 


FE64 DBE6 


KOFF 


IN 


A.IDTAREGI 


1 INPUT MY CHARACTER THE DEC SENT 


FE66 FEI3 


01490 




CP 


13H 


ICHECK IF XOFF 


FE68 28FA 


01300 




JB 


Z.XOFF 


:unr if wff is being sent 


FE6A FE1B 


01510 




CP 


330 


ITEST FOR ESCAPE 


FEGC CA2D40 


01520 




JP 


Z.402Dh 


;iF SO RETURN '0 DOS 


FE6F r'ElO 


01530 




CP 


CTRLP 


:test for control p 


Ft'7l CCSOFE 


01340 




CALL 


Z.SETP 


IIF SO .SET PF1A6 


Ft'74 FElZ 


01550 




CP 


CTRL* 


:test for coNTia « 


FE76 CCBBfE 


01360 




CALL 


Z.RSETP 


IIF SO. RESET PFlAG 




01570 


MMHWMHimiHIHtHtHHIIIHIIHMIIMIHHHIHIHHHIH 




01360 


• OTHERHISE OUTPUT THE CHARACTER » 




01590 


■MM 




FE79 79 


0)600 




LD 


A.C 


iLOAO A U/CHAR TO BE OUTPUT 


FE7A D3E9 


0)610 




OUT 


(DTAREG).A 


:lOAD HOLDING REG N/ CHAR 


FE7C FEM 


01620 




CP 


OAH 


us :' a line =• 


• ■ :C9AFE 


0)630 




CALL 


Z. LFCTR 


IIF SO DECRENENT lINE COUNT 


FE91 FEOD 


01640 




CP 


OOH 


IIS IT A <CR> ' 


FE93 2004 


01630 




n 


NZ.RETRn 


IRETURN IF MT 


FE85 OEOA 


01660 




iD 


C.OAH 


:IF SO OUTPUT A <iF^ AlSO 


F£87 1865 


01670 




jB 


STATIN 


.'Output i<3 uar? 


KM C9 


01690 R£T*k 


RET 




IRE TURN TO CALLING CODE 




01690 


Mtf« 


1 llllilllHIIKIIIIIIIIItmilllllllllHIlltllMIHIII 




01700 


Ml" 






: subroutines:: ::::::: :::::::::::::::::• 




01710 


* FORflFD ■-" 


GENERATES ENOUGH LINE FEEDS TO CREATE A FORH FEED • 




0)720 


t SET 


It* 


SETS THE PAUSE FlAG * 




01730 


• RSETP >>• 


RESETS THE PAUSE FlAG • 




01740 
01750 


t lFCTR "■ 


BECREPENTS THE LINE COUNTER EVERY LINE FEES • 



f£9A E5 
FEW 2 12940 
FE9E 33 
FE8F El 

FE90 C9 

FE91 OEM 

FE93 3A2940 
FE96 FEOI 
F£98 2906 
FE9A CD3EFE 
F£9D C39IFE 
ftftO 3*28*0 
FEA3 222340 
FEM 3AD3FE 
FtM FEFF 
F-M 2113 
FEAD C389FE 
FE90 F5 



01760 
01770 
01790 
01790 
01900 
01910 
01920 
01830 
01840 
01850 
01860 
01870 
0)880 
01890 
01900 
0)9)0 
01920 
0)930 
01940 



LFCTR PUSH Hl : SUBROUTINE TO DECRENENT 7h£ ..InC CTR 

L* nl.linECT IGET LtM COUNT ADDRESS 

KC ihlI IKCBEJCNT IT 

POP HL IRESTORE W. 

RET 

FORHFD LD C.OAH :G£hERATE A FORH FEED 
IPUT LINE FEED :n C REG 

LD A.ilINECT) IGET LINES TO EM OF PAGE 

cp i ;at bottor YET' 

JR Z.FF9UIT IGUIT IF AT BOTTON 

CAll STATIN IELSE OUTPUT LINE FEED 

jP FORHFD ;and BO IT AGAIN TIll BONE 

FF8UIT iD A.IPGLNTHI IIF DONE GET PAGE LENGTH 

LD ILINECTI.A INOVE IT TO LINE COUNT 

LD A.(PFlM) IChECk PAUSE FlM 

CP OFFm IIS IT FFm' 

JR Z.PlOOP IlOOP IF SET 

JP RETRN IEL5E RETURN 

SETf PUSH AF ISUWOUTINf TO SV 'AW FlAG 



Program continued 
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PRINT MONEY WITH YOUR TRS-80! 



If you have a TRS-80 disk system, you 
already own "Money Machine" It can 
"print money" for you and your family 
and do it legally 

Virtually every business in your com- 
munity has customer and prospect lists 
people and companies that they should 
send mailings to on a regular basis But. 
they seldom do In a typical business, these 
names and addresses are totally 
disorganized and seldom used even 
though they represent a valuable sales 
tool. 

PUT YOUR TRS-80 TO WORK 

Your TRS-80 has the ability to totally 
organize mailing lists for these companies. 
It also has the ability to supply them with 
tabular listings and mailing labels upon 
request. All it takes is a little bit of your 
time. Any progressive business would be 
happy to pay you a nominal fee to keep their 
lists organized and up to date. What's a 
nominal fee? You can charge 10 cents a 
name to enter, store and maintain each 
record in your computer. It's also worth 3 
cents to supply this name on a gummed 
mailing label. Think of it. The label costs 
three-tenths of a cent going into the printer 
and. with the value you add. is worth 3 
cents when it comes out the other end 
That's 1000% profit. That's a "Money 
Machine" 



HOW DO I GET STARTED? 

As a minimum, you'll need a 32K TRS-80 
with at least one disk drive and a good line 
printer You'll also need a copy of 
"LABELMAKER". available on diskette 
from The Peripheral People This program 
will allow you to input names and 
addresses, plus optional data such as 
company, phone number and so on 
"LABELMAKER" also features a unique 
method of coding each record You can 
selectively print labels by using these 
codes and bypass all others. The records 
can be sorted by zip code or alphabetically 
by company or name In other words, you 
can provide mailing labels or tabular 
listings any way your customers want 
them. 

ANY FRINGE BENEFITS? 

You bet! Providing this service is a great 
way to get the family involved with your 
TRS-80. Teenagers can easily input and 
output records during the day Most 
women are latent business persons and 
your wife can easily sell the service ... parti- 
cularly if it means some new clothes, 
furniture or other "fringe benefits" for her 
You can probably promote discounts or 
trade services with your customers Once 
you've established a business in your home 
you can legally write off a portion of the 



rent and utilities even your TRS-80. to 
your business This can reduce your taxes 
substantially The possibilities for making 
money with your TRS-80 are endless 

YOU RISK NOTHING 
If you don't agree that our LABEL- 
MAKER program does everything that we 
say. then return the diskette along with a 
letter telling us why and we will 
immediately refund your full purchase 
price, plus the postage 

TURN THE SWITCH TODAY 

Are you willing to invest $99.50 to turn 
the switch on your "Money Machine "? 
Then call The Peripheral People today and 
order your copy of "LABELMAKER" You 
can charge it to your Mastercharge or VISA 
card 



START YOUR MONEY 

MACHINE TODAY 

BY CALLING 

THE 

PERIPHERAL PEOPLE 

(206) 232-4505 ^« 



The PERIPHERAL PEOPLE Box 524 MERCER ISLAND, WA 98040 



'TRS-80 is a trademark of tha Tandy Corporation 



DR. HOWE'S SOFTWARE^ 

For the TRS-80 (*) 



MAC 



ISMtfB 



IIAGE 



MONITOR #3 J39.9S 

Disassembler; memory display*; memory move, 
March verify, and modify; read and writ* oto|ect 
tape*; hexadecimal arithmetic; object code reioce- 
tor; unload programs for disk; symbolic output 
tape*; 41-page Instruction manual. 

MONITOR #4 S49.9S 

Same a* Monitor *3 but adds: save and read disk 
fllas: direct Input and output of disk sectors; send, 
receive, or talk to another computer via RS-232-C In- 
terface; symbolic disassembly on disk. 

SMART TERMINAL $49.99 

Enable* your TRS-80 to be used as a remote tar mlnal 
to a time-sharing syetem. Supports lowercase and 
full range of control keys. Automatic tranamlatton 
between memory and host computer. Much more 

PACK/UNPACK «4 95 

Increase disk file capacity by 33% with NO NEW 
HARDWARE. Applies only to string data in random 
filee. Ideal for mailing lists, etc. 

GAME OF "LIFE" $5.95 

John Conway's game of "life" shows patterns evolv- 
ing and changing swiftly before your eyes. A dazzl- 
ing demonstration program! 

•AMC SOFTWAKE 

MAILING LIST (Qg.99 

Maintains mailing list filee of over 1000 names pet 
diskette. Add. delete, change, find name, machine 
language eort. print file. 

SMALL BUSINESS ACCOUNTING 149.96 

Baaed on Dome Bookkeeping Journal #612, keeps 
track of income, expenditures, and payroll for a 
small bueinees of up to 11 e m ployee s . Daily, month- 
ly, year-to-date summaries. 

HOME BUDGET $49.95 

Checkbook maintenance combined with records of 
income and monthly bills. Monthly and year-tc-date 
summaries showing tax deductions. 

DATABASE MANAGEMENT. $29.95 

Define files of any description and maintain on cas- 
sette or disk. Add. change, delete, find, sort, fustlfy. 
print, line print, totel fields, write. 



HOWE SOFTWARE ^103 

14 Lexington Road 

New City, New York 10956 

O TRS-90 is a rep/afeveo" trademark of Tandy corp. 



Everything needed to add pow 
capability to TRS-80, Modal 1, 

SCIENTIFIC ENGINEERING LABORATORY 

11 NEIL DRIVE • OLD BETHPAGE, NEW YOR 
TELEPHONE (516) 894-3205 




GP1B-488 to TRS-80* 
INTERFACE j 

Mod. 48&S0B 
$225.00 

+ shipping, Insurance & tax 

SPECIFY 
DISK OR TAPE 

*Tndt Mark of Tandy Corp, 
There is no affiliation between 

Scientific Engineering Laboratones 
and Tandy Corporation or Radio 
Shack. 


9fful controllsr 
Level 2 or DOS 

S f291 

< 11804 



s 

FO 


LOWER CASE A GRAPHIC 
YMBOLS GENERATOR KIT 
R TRS-80 TB CG 16 $94.50 


SYNCHRONOUS DATA 
SEPARATOR FOR DISK USERS. 
SDS $34.50 

THE SYNCHRONOUS DATA SEPARATOR WILL 
ELIMINATE 100S OF THE SOFT READ ERRORS 
AND SPEED UP DISK ACCESS TIME BY ELIMIN- 
ATING RETRIES BY THE DISK CONTROLLER 

THE SDS PLUGS INTO THE 0ISK CONTROL- 
LERS SOCKET ANO HAS ONLY TWO WIRES TO I 
CONNECT NO TRACES HAVE TO BE CUT IT IS 
THE MOST RELIABLE AND ACCURATE DATA 
SEPARATOR AVAILABLE 


SMBCDErGM! JKlllMOPCWSTUVUX-e^Tl... 

pj at". <•*•<*'' > Jl lw»p»-ftg'iu. a i 1 ,| ft 

• -. . .-r .-. r^A-aa. ; -, 1 .T.-:-."r*t¥ 

r-_T ■ ■ 00 1 1+ ♦♦*•* 






ADD $2 50 FORS *H CALIF RES ADD6SSALETAX 
SEND CHECK OR MONEY ORDER TO 

G.P. ASSOCIATES "** 
P.O. BOX 22*22, SACRAMENTO, 
CA 95822 

TRS-80 IS A TRADE MARK OF TANDY CORP 


Tfll 
IC 

eo 

MO 
FUl 
FOI 
REC 
Oft 


IE 2 LINE DECENDER LOWER CASE ELECTRI 
SYMBOLS. THIN LINE GRAPHICS GAME S> 
S. TEXTURED BACKGROUNDS AND MA 

BE DEMO CASSETTE IS INCLU0E0 

LY ASSEMBLED WITH DETAIL INSTRUCTl 

1 EASY INSTALLATION 

iUIRES ELECT PENCIL TYPE LC MOO 

3ER MEMORY AND SWITCH KIT SMK FORSI8 


N- 
M- 
NY 

ON 

OR 

50 



^fleerfer Servtee- see page 162 
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The baud rate and variable 
table are explained in the Radio 
Shack RS-232 users manual. 
The last section is the house- 
keeping routine to return to the 
video driver. 

If you have added lowercase 
to your TRS-80, remove lines 
2400 thru 2420 and all of the 
proper conversions will be 
made. 

Conclusion 

The only problem I have en- 
countered is that the editor as- 
sembler uses upper memory to 
store its symbol reference table 
and a large table will wipe out 
the driver. It will also wipe out 



any other routines that you have 
in upper memory — so beware! 

I invoke this routine with 
SYSTEM /65001 on my comput- 
er, but if you have smaller 
memory, change the ORG in line 
600. This is the address you will 
use to enable the keyboard. 

One last word about this pro- 
gram and assembly language 
programming on the TRS-80. If 
you have a disk, but have not 
bought the Apparat Editor/As- 
sembler patches, you are not 
realizing the full potential of 
your TRS-80. The only problem is 
the lack of a memory size com- 
mand at assembly to protect the 
drivers. ■ 



Continued Program 



ftll 3EFF 
f£I3 32D3FE 
ffSS Fl 
«I7 CS 
FEil n 
FEB9XM 
ffJI 32I3FE 
FOE Fl 

riv cs 

FEC0MCI 
FEC2FEM 
FEC4 ZOFA 
FECS C389FE 



FECS n 

Ft CA 44 
FECI S3 
FECC CC 
FtCB 77 
FECE M 
FECF CC 
FEW ££ 
FEBl 00 
FEI2 00 
FED3 00 



01*50 

01K0 

01974 

01990 

01990 RSETF 

02000 

02010 

02020 

02030 

02040 fLOOf 

02030 

02060 

02070 

02090 ,**•* 

02090 I* 9MI 

02100 :**mm 

02110 MTML 

0ZI20 

02130 

02140 

02130 

02190 

02170 

02190 

•2190 SNT1K 

02200 flag 

02210 PfLM 



LD 
LI 

m 

(JET 

PUSH 

lD 

LD 

POP 
KT 
Ik 
CP 
JS 

if 



«.0FFh 
(PfL«C).« 

w 
If 

1.0 
(PFlMI.« 

•J 

l.(DTMEG) 

m 

nZ.KW 
<KTM 

IMIIMI1M 



:pui ff in « 

:PUT IT Ik PAUSE FUS 

;ktuhi to callInc cue 
iboutike to ieset pause flas 
;get o lk a ieg 

ISTDRE Ik PAUSE FlAG 

:retum to calling code 
: pause loop. get last key mit 
;hm it a <a> 
;if mt loop 

IkHEk <CI> NIT. TMEk KTUM 

IHHIIHHIIHHIHHimMHHI 



•ATE Ak9 WARIA9LE TAIU 

HWHIIHHtlll lll l l l ll l 



Kft 
KFB 
IEFB 
DffB 
KFI 
9EFB 
KF1 
«F8 
KFB 
PEFI 
DEFB 



22» 
44H 
3J« 

SfH 

77h 

OCCM 

0€Em 

0OM 

OOH 

00 



l u t mm i mmimn ii m 
:il0 9AU9 
;i30 9AU9 

: 300 Mm 
;soo muo 

M200 MUD 
12400 9AU9 

14100 9AU9 
13*00 BAUD 

;img£ of hamshme latch 
;flas to inbicate initialization 
: pause fla6 



ftM F3 
FE95 C3 

FEN E3 
F07 C922FE 
FEM £1 
FEMCl 
FEN Fl 
FEM WK03 
FEE0 DNS04 
FEE3 0A9A04 
FEES N7E03 
FEE3 17 
FEEA 2M1 
FEEC 77 
FEE! 79 
FEEE FEBO 
FEF0 FAOFE 
FEF3ES5F 
F£F3 FEM 
FEF7IA0SO3 
FEFA FEM 
FEFC D2AS04 
FEFF C370O4 
4020 

00000 TOTAL 
IAUKT FE3E 
HTABL FECS 
CNTKG OOEA 

crtu. oooc 

CT9U> 0010 
CT9U 0012 
NCINTFEB 
ITMEG OOCB 
FF9UIT FEA0 
FFTEST FT4F 
FUS FEN 
FOIUFO FE91 
INK FEOO 
UINIT FNF 
LFCTI FEM 
LINECT 4029 
'FLAG FEN 
PGLNTH 4029 
PLOW FEC0 
KST0R FE4C 
KSU17 0OEI 
•ETM FEN 
IXTP FEN 
IS FEM 
SETP FEN 
STATIN FE3E 
MITCH ME9 
MTIM FOI 
VIII FED 
VII? FEF3 
V1K0 FEM 
X0FF FEM 



02220 
02231 
02240 
02250 
022M 
02270 
02280 
022M 
02300 
02310 
02320 
02330 
02340 
02350 
023M 
02370 
02380 
02390 
02400 
02410 
02420 
024N 
02440 
02450 
024S0 
02470 
024M 

IttOK 

OHM 

02110 

00430 

00320 

00300 

0NI0 

00170 

M4S0 

0I9M 

01320 

02200 

01910 

N770 

OM30 

0I7M 

0*340 

02210 

00330 

•2040 

01230 

M379 

01690 

01990 

00910 

•1M4 

01 400 
004M 
021M 
02390 
02430 
02250 
014M 



.HHHHttllHIIIIIHHHimiimmilHHHIHHimHIHIHHI 

:• this is the vino nivm. nn't fonet to m the kc out. • 

; I H I HH I u m i H HI HII III IIII I II I IHIII IIII II II IIH I 

VINO PUSH AF 



VID1 



PUSH 

PUSH 
CALL 

POP 

POP 

POP 

Li 

LD 

JP 

LI 

00 

JB 

Ll 

ll 

CP 

It 

AM 
CP 

JP 

CP 

JP 
JP 

END 



K 

NL 

KCINT 

ML 

K 

AF 

L.IIX«3I 

h,(IX*4) 

C.049AH 

A.(IX«3) 

A 

2.VII1 

iHLl.A 

A.C 

MH 

N.VIN 

SFH 

2M 

C-0506H 

NH 

NC.04ASM 

047* 

402DH 



:save KSISTOS 

;0UTPUT CHAMCTEI TO OECMRITER 



;KST0K K6ISTEK 



;c0w€it l«i to upper case 
:knm these three lines 
mf you have the lonei can no 



01170 

MM0 SUN 014M 

00690 

00M0 »I534 
0ONO0ISSO 

00390 00790 02290 
00030 01 4M OHIO 02044 
OIMO 

04770 010M 01050 
00900 01370 01971 



01SX 
00(20 
01900 
0OBI0 
O1920 
01034 
01060 
01S50 
00970 
00920 
00930 
•1344 
•1074 
OHIO 
02374 
02410 
04570 
01300 



01324 01770 01930 01 NO 

01960 020)0 

4IN0 

020M 



01930 02479 
015M 

01540 

•1*20 01670 01960 

01140 01224 



INFLATION 
BEATERS 



sold with 30 Day Refund Privilege 

Mod | PACKAGE... aM for $ 149 

• Receivables • General Ledger 

• Payables 

SUPER DISC — 
70 PROGRAMS $1 3.95 



Write: Elliot Kleiman ^132 

National Software Marketing, Inc. 
4701 McKlntey St. 
Hollywood, Florida 33021 



PROGRAM 
EPROMS! 



Now the computer hobbyist 
can Inexpensively program 2708s 
by building his own programmer. 
The CC-500, built from readily 
available parts, will turn any 
TRS-80* Into an EPROM programmer. 

The CC-500 can also expand 
your ROM capacity by IK. 

The complete assembly manual 
with software and schematics Is 
now available for $5.g5 



COMPUTER CONNECTIONS 

P.O. Box 400 

Northford, CT 

06472 



l l-Mwnart ol in. T1.-.3, Cowiw p 



f288 



^■^5 )) CalDatm Systems Presents 

WordMagic II 

Complete WORD PROCESSING 

designed specifically for 

The Radio Shack TRS-80 Model ll Computer 

WordMagic II' is a Woid Processor designed specili 
cally lor Ihe Radio Shack TRS-80 Model II Computer ' 

FEATURES INCLUDE: 

•Mailing List/Labels Generation 

•Automatic Merging ot Mailing Data with Tent Files 

10 created PERSONALIZED' Form Letters 
• Aulomalic wrap around in text entry 
•Margmation. Paging. Complete Cursor Movement 
•Complete Editing Commands - insertion Global 

Substitution. Overwrite, etc 
•Centering. Smooth Right LeM Justify 
•Table ol Contents Generation 
•Automatic Page Numbering 

• **OH> SftKB Owvot ol I »ndv Ccpcyalion 



flaavJras UrUod*tll. THSOOS • OHSICr»otp>oW M d wiM WordMagic) 

Inlroducfory Pricing 1100.00 M.nu.J MO. (Cat Am. »M III) 



CalData Systems \J&) P.O. Box 178446 
Sen Diego, CA 92117 ^294 
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INTEGRATED 
EYPLUS UTILITY 

PACKAGE 



Keyplus is a collection of utilities that can be enabled directly 
from the keyboard of a Level II TRS-80. Seven different keyboard 
entry modes include BASIC shorthand (2 modes), direct graphic 
character input (3 modes), typewriter style input and standard 
TRS-80 entry. 

Keyplus supports auto-repeat, lowercase video (optional hard- 
ware modification required), restoration of lost programs, key- 
board debounce, single key stroke user definable strings and more! 

Designed for ease of use, Keyplus routines may be enabled or 
disenabled in two key strokes. 

The Level II version of Keyplus is available for $14.95 and a more 
powerful disk version (32 or 48K) sells for $19.95. Pennsylvania 
residents add 6Vo sales tax. 

TRS-80 is a registered trademark of TANDY CORP. 

SJW, INC. „ 

P.O. BOX 438 

HUNTINGDON VALLEY, 

PA 19006 

215-947-2057 



NEW! 
779 Line Printer Timer 

Works with TRS-80® and 

Centronics® 779 Line Printers 

Turns Motor on and off 

Automatically 

No software or hardware changes needed. 
Saves motor life and power. Just solder 3 
wires and mounts inside printer. Dealers 
wanted, inquire on company stationery, 
also O.E.M. and service accounts wanted. 
$95.00 complete with one year warranty. 
Make checks payable to: 



• 308 



Digital Timing Devices 

4306 N.E. 6 Ave. 

Ft. Lauderdale, FL 33334 USA 

Phone #(305) 561-3757 

Division of D. S.S.I. 
These are registered trademarks for Radio Shack & Centronics 



FINALLY... 

PROFESSIONAL SOFTWARE. . . 
Get results on the first run 

NO MANUALS! j 
\ TRS-80^ • • • ■ ! 

DEPRECIATION $19 
B MAILING LIST $79 
1 ADDING MACHINE $19 J 




The 

Maine 

Software 


1 TEXT EDITOR $99 




Liht+2M+\j 


I AMORTIZATION $19 




mmmmWm €Mm w 


COMPOUND INTEREST $19 

) DEC/HEX/BI $19 

PAYROLL (specify) $49 

Weakly, 

Biwtckly, 




We rent games and 
utilities for the TRS-80* at a 
fraction of their purchase 
price. 


Monthly, or 






t Semimonthly 

INVOICE $29 

(check m. order) 

PA residents. . .add 6% 

* » 
TRS-80 is a trademark of the Tandy Corp 




For catalogue, check 
Reader Service. For faster 
service send S.A.S.E. to: 
The Maine Software Library 
P.O. Box 197 
Standish, Maine 04084 

.-268 

*A Trade name of the Tandy Corp. 


DIVERSIFIED COMPUTER SERVICES 

5601 PENN AVENUE A-23 j 
PITTSBURGH, PENNSYLVANIA 15206 


1 412-361-7540 "W \ 







PRACTICE 
MAKES PERFECT* 

•ESPECIALLY IF IT'S FUN! 

Every child who learns math needs 
practice. Problem after problem 
after problem. But sometimes, 
practice can get boring. And when 
it's boring, your child won't learn. 

Now, though, there is a way to 
practice that's always interesting. 
And fun! It's called ARITHMETIC. 

ARITHMETIC not only generates 
problems, it keeps your child in- 
volved with entertaining graphics. 
Moreover, it repeats troublesome 
problems and automatically ad- 
justs to your child's rate of 
learning. And it keeps track of 
your child's progress. 

Without a doubt, practice makes 
perfect. Especially with 

ARITHMETIC. 

ARITHMETIC. Features =. - x - $15 on 
cassette TRS-80 Level II required Calif. 
residents add 6°o sales tax TRS-80 is a 
trademark o* Tandy Corp 

• 241 

RATIONAL SOFTWARE* 

963 EAST CALIFORNIA BLVD. 
PASADENA, CALIFORNIA 91106 



*- Reader Service - see page 162 
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SOFTWARE 



A guessing game, where the computers recognize patterns! 



True or False? 



John Krutch 

P.O. Box 9284 

Fort Worth, TX 76107 



The subject of artificial 
intelligence seems to 
fascinate everyone, computer 
scientists and the general 
public alike. Public interest in Al 
is amply demonstrated by the 
popularity of such movies as 
The Forbin Project and The 
Demon Seed. (Both of them are 
shallow and unimaginative; for a 
much more thoughtful presenta- 
tion, see the computer-psychia- 
trist in science fiction writer 
Frederik Pohl's fine novel. 
Gateway.) 

Computer scientists, like 



Terry Winograd and Peter 
Woods, are hard at work 
developing programs that some- 
day, perhaps, will make these 
fictional portraits a reality. 

Most of the programs are writ- 
ten for big computers with 32-bit 
processors and elephant-like 
main memories. Smaller, but in- 
teresting Al programs can be 
written for 8-bit processors with 
modest amounts of memory. 
The TF program I describe in 
this article is one of them. 

How the Game Works 

TF is a sort of prediction 
game. The program tries to 
predict what the player is going 
to do next, based on its observa- 
tion of his past behavior. 

The player types in the letter T 
or the letter F at random. The 



program must figure out which 
letter the player plans to type 
next. The program assumes that 
a person's behavior is never tru- 
ly random. No matter how many 
times the player tries to arbi- 
trarily respond, certain patterns, 
of which he himself may be un- 
aware, surface in his actions. 
The program carefully stores 
each response, whether T or F, 
and searches for patterns in the 
player's behavior. If it finds a 
particular pattern that occurs 
again later, the program finds 
itself in a position to make a 
prediction. 

TF is written in Radio Shack 
Level II BASIC. It requires 16K 
RAM in its present version, but it 
can be converted to a 4K ma- 
chine without too much effort. 
The program stores the first four 



characters the player types in 
order to make its prediction. The 
character that the player types 
is known as the "current event." 
(This terminology is adopted 
from Al researcher John H. An- 
dreae of New Zealand, although 
the program itself is not derived 
from Andreae's work.) 

Starting with the fifth current 
event, TF makes its first predic- 
tion by displaying the character 
it has established the player will 
choose. The player must wait a 
second or two for the command 
READY to appear before typing 
another character. 

The keys you strike do not ap- 
pear on the display. The letter 
that shows on the screen after 
you press a key is the 
computer's prediction. The pro- 
gram keeps a running score of 



Program Listing 1. 



INITIALIZATION 



10 ' 

20 RANDOM 

30 DEFINT C.E.F. I.w.R.T 

40 DEFSTR A 

50 DIM G < 1 11 1 . 2 ) 

60 CNTXTLNGTH = 4 

70 CLS 



|. :>• I ■ 



INPUT SUBROUTINE 



GOSUB 500 

CRNTCNTEXT< I ) = EVENTCODE 

NEXT I 



100 
I '.11 
120 
1 30 
140 

150 GOSUB 500 

160 GOSUB 800 
170 GOSUB 600 
180 IF EVENTCODE - 
Q(L0.2> - Q(LO 
190 GOSUB 700 
200 GOSUB 600 
210 GOTO 150 



MAIN PROGRAM 
TO CNTXTLNGTH 



INPUT SUBROUTINE. 

PRINTING AND SCOREKEF.PING SUBROUTINE 
LOCAT ION-CAL CULATING SUBROUTINE 
1 THEN &<LO»t) » (J(L0.1> ♦ 1 ELSE 



CURRENT CONTEXT UPDATING SUBROUTINE 
LOCAT ION-CAL CUL AT I NG SUBROUT INE 



t-00 " INPUT SUBROUTINE 

510 PRINTS 412. -READY- 

520 CURRENTEVENT* = INKEY»: IF CURRENTFVENT * ■ "T" OR 

CURRENTEVENTS = "F" THEN 530 ELSE 520 

530 IF CURRENTEVENT* = "T" THEN EVENTCODE = Is GOTO 550 

540 IF CURRENTEVENT* - "F" THEN EVENTCODE = 0: GOTO 550 

550 CLS 

560 "I I JRN 



LOCAT ION-CAL CUL Al I NG SUBROUTINE 



600 • 

610 A = "" 

620 FOR I = 1 TO CNTXTLNGTH 

630 A = A » MID«(STR*(CRNTCNTEXT< I ) )i2) 

640 NEXT I 

650 LO = VAL(A) 

660 RETURN 

/H0 ' CURRENT CONTEXT UPDATING SUBROUTINE 

710 r OR I = 1 TO 3 

720 CRNTCNTEXT< I I = CRNT CNTE XT < I •. II 

: Ifl NEXT I 

740 CRNTCN1EX1 (4) = EVENTCODE 

,"i0 m TURN 



e:00 
810 

820 

830 
£:40 
850 
t:60 
870 
E'RB 
8V0 
700 
- U - 

920 



PRINTING AND SCORE KEEP! NG SUBROUTINE 
IF iS(LOil) ' 0<l''i..') THEN TF« ■ " T" : T = T ♦ 1 : 
PRINTS 350. TF«: GOTO 860 

IF ftllii.:.'! lil(LO.l) THEN TF« ■ "P" t F « F * 1 1 
PRINTS 350. TF«: GOTO 860 
RAN = RNDC2) 

IE RAN = 1 THEN TE » = "T* I T = T 
IE RAN = 2 THEN TF* = "F - : F = F 
IF TF» = CURRENTEVENT* THEN RIGHI 



I 1 : PRINTS 350. 
I 1 : PRINTS 350. 
-- RIGHT ♦ 1 



■ • * 

n t 



PRINTS 512. " TOTAL NUMBER OF ENTRIES: 

PRINTS 576. "NUMBER OF CORRECT PRE-" 

PRINIS 641. "DICTIONS BY THE' COMPUTER: 

PRINTS 704. "F-ERCENT Of CORRECT PRE-" 

PRINTS 769. "DICTIONS BY THE COMPUTER: 

INT (( (RIGHT / (T * E i I • 1001 • 10 ♦ . ■ 
PI I URN 
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how well it's doing. 

How does TF make its predic- 
tions? Each time the player 
types in a letter, TF examines 
the "current context" — the last 
four letters you've typed, in- 
cluding the one you just en- 
tered. The length of this context 
is four. That is the value as- 
signed in line 60, but you can ex- 
periment with other values. 

Suppose you type the letter T. 
Assume that the three previous 
characters were T, F and F. The 
program consults array Q to see 
what you did in the past when 
the combination TFFT came up. 

For example, if you typed T 
six times and F twice after the 
pattern TFFT first appeared, the 
program predicts that the next 
character you will type is T. If 
you have typed T and F an equal 
number of times after a parti- 
cular pattern, the program gen- 
erates a random T or F as its 
new prediction. 

Each time you type in a new 
letter, TF eagerly codes it (T =1, 
F = 0) and stores it as data. The 
storage structure set up in line 



SO is a 1 1 1 1 X 2 array. The vast 
majority of the elements in this 
array go unused. It's done this 
way only for convenience. 

The program consists of six 
modules, shown in Listing 1. An 
initialization routine takes care 
of some housekeeping, followed 
by the main program and four 
subroutines. 

The REMark statements are 
intended to help you understand 
TF, but they can be omitted 
when typing the program. The 
long variable names can be ab- 
breviated to the first two letters 
of the name without damage to 
the program. However, if the 
variable name contains the $ 
character, this must be included 
in the abbreviation. For in- 
stance, CURRENTEVENTS must 
be typed in either as CU$ or in its 
entirety. 

Incidentally, variable A in line 
610 is set to the empty string, 
not to a blank. The confusion 
sometimes produced when dou- 
ble quotation marks are printed 
is one of the few defects of 
Radio Shack's Line Printer III.B 



P&T CP/M* 2 unleashes the POWER 
of your TRS-80 MODEL II 

Pickles & Trout has adapted CP/M 2. one of the world's most 
popular operating systems, to the TRS-80 Model II and the 
result is spectacular: 

• 596K bytes usable storage at double density 

• Runs both single and double density disks 
with automatic density select 

• Single drive backup 

• Mufti-drive software can run on a 1 drive 
system 

• Operates with 1 , 2, 3, or 4 drives 

• Full function CRT control 
•Type-ahead buffer for keyboard input 

• Full access to both serial ports and parallel 
printer port 

•Fully software programmable serial ports 

• Loads an 18K Basic in 2.5 seconds 

• Full compatibility with existing CP/M software 
and application packages 

• Full set of 7 CP/M manuals plus our own for 
the TRS-80 Model II 



s 

TROUT 



Introductory price: $1 75 

Prepaid COO Maslercnarge Of Vrsa orders accented 
Sri ppi-14 extra California residents add 6* sales ia» 

• 273 

PICKLES & TROUT 

PO BOX 1206. GOLETA. CA 93017. (805) 967-9563 



CP/M .■ a trademark o> D griai Research ' 



rademarh o* Tano» Corp 



WHATS NEW? 

(with the "Original" TRS-80® Users Journal) ** 



The CONNECTION, our May-Jun cover story, is a 
smaller-than-a-bread box device that enables even 
4K Level 1 owners to use the RS232, serial 
printers, and telephone modem WITHOUT the 
expansion interface or acoustical coupler and to 
participate in the expanding area of computer-to- 
computer chatter via telephone. (We include a 
phone number listing of resources to call after 
you've been Connected.) An excerpt from David 
Lien's "Learning Level II" discusses data sorting. 
The creator of "ANDROID NIM" cooks up some 
SOUND producing BASIC routines with machine 
language stuffing. Our new, magical "Panacea" 
delves into the ways and whys of the S-80 Bus. 



There is a review of Radio Shack's new text editor 
and a user tells how to (or how not to) handle a 
"RELIGIOUS ERROR"!? Plus, there are the 
regular features: A tutorial on the 
Editor/ Assembler for beginners; New Products; 
Reviews and the Business Section. It isn't called 
the "TRS-80 Users Journal" for nothing! It is 
published regularly every two months, and costs 
just $16.00 per year in the U.S. Get a sample 
current issue (first class mail) for just $3.00. Use 
your VISA or Mastercharge and call (206) 475- 
2219 today! Or, send check or Money Order to: 
80-U.S. Journal 3838 South Warner Street 
Tacoma, Washington 98409 



Yes! We are the people who developed "Android Nirrf 
and other fine animated graphics programs with sound! 



i 



I Kb 80 is a trademark ot Radio Shack, a Division ot the Tandy Corporation 



* Reader Service - «•• p«fj« 162 
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GENERAL 



Learn about assembly language by "looking" into the Z-80. 

Assembly Language Trainer 



William L. Colsher 

4328 Nutmeg Lane, Apt. 111 

Lisle. IL 60532 



Sooner or later, most hob- 
byists get the urge to learn 
assembly language. Unfor- 
tunately, many never get any fur- 
ther. They've heard that assem- 
bler is hard to learn, that only ad- 
vanced programmers use it, and 
that it is only good for bit twid- 
dling. 

Actually, assembly language 
is no more difficult than any 
other programming lan- 
guage—it just takes a slightly 
different mind set. One must 
think not only about solving the 
problem at hand, but also about 
what is physically going on in- 
side the computer. 

Because nothing stands be- 
tween your program and your 
computer's CPU, assembler 
programs can be very fast. Real- 



time games with animated 
graphics come to mind as a 
case where fast execution is 
critical. If you have any devices 
like coffee pots or furnaces you 
plan to use as peripherals, 
chances are you'll want to use 
assembler programs to control 
them. 

I can't teach you assembler in 
a single article. I can give you a 
tool— the TRS-80 Trainer— to 
make learning assembler a little 
easier. It is an assembler pro- 
gram that will run with changes 
to the I/O on any Z-80 computer. 
not just the TRS-80. The pro- 
gram instantly shows the result 
of nearly all the machine in- 
structions which you're likely to 
find troublesome. 

Getting the Program to Run 

Obviously, you'll need an 
assembler. This is a not-so- 
subtle technique to get you into 
using assembly language quick- 



Displayed on Monitor 




Comments 


MEMORY SIZE">(cr) 






RADIO SHACK LEVEL II BASIC 


READY 






>SYSTEM (cr) 




Puts the computer into system mode and 
allows it to read machine language tapes put 
out by the Assembler 


•'TRAIN (cr) 




TRAIN" is the name I used lor the program 
when I assembled it 


"'/17152(Cr) 




17152 is the decimal address ol the tirst in- 
struction in the Trainer When you press 
ENTER the Trainer display comes on (Sec 
Fig 2| 


Pig. 1. 


How 


to load the TRS-80 Trainer. 



ly. This particular program is 
written for the Radio Shack 
Editor/Assembler, so you' 1 1 need 
to run out and buy one. 

If you already have another 
assembler, you may have to 
make some changes in the 
code. They shouldn't be major, 
though. You'll also need a Level 
II TRS-80 with at least 16K. 

All the information on getting 
the Editor/ Assembler running is 
included in the Radio Shack 
manual. Since it is a system for- 
mat tape you may have some 
trouble loading it. Be patient 
and keep turning the volume 
down. Some of the information 
about using the assembler 
won't make too much sense at 
first, but things should seem 
more clear after you've started 
to type in the program. 

While you're typing the pro- 
gram, you'll be glad to know that 
the spaces in the code listing 
are actually tabs— the right-ar- 



row on the keyboard. Naturally, 
spaces that are inside quotes 
are actually spaces. Just as in 
BASIC, comments can be 
deleted, but really shouldn't be. 

Because this program uses 
many symbols, assemble it with 
the "INS" option. This sup- 
resses the symbol table, and 
you can see how many typos 
you make. When the symbol 
table is displayed on the screen, 
it scrolls the error count off. 

Once the program is error 
free, follow the instructions in 
the Editor/Assembler manual 
for creating a tape. Make sure 
you save the source with the 
"W" command as well. 

Using the TRS-80 Trainer 

You're now ready to run the 
TRS-80 Trainer. Your system for- 
mat tape should have the 
TRS-80 Trainer on it. Fig. 1 
shows how to load the tape and 
start up the program. 



A 


-00000000 00 


F-0000000000 Al -0000000000 


F1 -oooooooooo 


B 


-00000000 00 


C - 00000000 00 B1 -0000000000 


C1 -oooooooooo 


D 


-00000000 00 


E-0000000000 D1 -0000000000 


E1 -oooooooooo 


H 


-00000000 00 


L-0000000000 H1 -oooooooooo 

[-0000000000 R-0000000000 
IX - 0000000000000000 0000 
IY - 0000000000000000 0000 

INSTRUCTION: 


L1 -oooooooooo 




Display format Register name 








Binary representation of register contents 






Hexadecimal representation ol register contents 






Fig. 2. TRS-80 Trainer Display. 
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Intelligent 
choice. 



Now it's possible to turn your TRS-80 into an intelligent 
terminal— with the TermCom package from Statcom. 

The TermCom package includes the hardware Level II users 
need for timesharing, and the software to convert it into 
an intelligent terminal. With TermCom, you can unload entire 
files and keep up to 13 screens full of data in the terminal, ready 
for instant use. TermCom also adds the convenience of 
scrolling, automatic formatting, buffer overflow protection, 
and the ability to lock data on part of the screen while 
using the rest. 

The TermCom package is only SI 50. The software only is $50 
on disc, S40 on cassette, documentation is SIO. When you 
want to add timesharing, test equipment, serial printers. 
or other peripherals to your TRS-80 . . . TermCom is an 
intelligent choice. 



Statcom 

Corporation 

5758 Balcones Dr. Suite 202 
Austin, TX 78731 (512)451-0221 



rTRS-80 
Owners! 



^Software that means Business* 

A vailable for immediate delivery 




Order Entry 
Invoicing 
Inventory Control 
Accounts Payable 
Accounts Receivable 
Payroll 
General Ledger 

• Custom Business Programs 



Medical/ Dental 
Sales/ Marketing 
Stock Market 
Data Base System 
Word Processing 
Business Statistics 
Games 



All Business Programs Operate With Printer. 
Call or send for our complete catalog today. 



Software Mart 



24092 Pandora Street 

El Toro, California 92630 

(714)768-7818 
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Radio Shack Dealer 
Computer Systems Center 

TRS-80* 

SPECIAL 

4K Level I was $499.00 
NOW $440.00 

16K Level II was $849.00 
NOW $739.00 

Available for immediate delivery. 

Warranty honored at any Radio Shack. 

Add $7.00 shipping and handling in 

continental U.S.A. 

Tennessee residents add 6% sales 

tax. 

Send check or money order to: 

Radio Shack Dealer 

103 Pico Court 

Hendersonville, TN 37075 

Phone 615-824-5762 



• 256 



"Tandy trademark 



J*S 



■it 



***%$ Computers 
fc Gambling 

PROBABILITY 
HANDICAPPING 
DEVICE I 

A TRS-80* LEVEL II BASIC PROGRAM FOR: 

HORSE RACE HAHDICAPPINQI 

"BE A WINNER: READ COMPUTERS & GAMBLING MAGAZINE 

SAMPLE ISSUES $100 
This amazing program was written by a professional soft- 
ware consultant to TRW Space Systems, and is being 
introduced by the publishers of Computers & Gambling 
Magazine PHD-I" is a large complex level II program 
requiring a full 16K It is carefully human factored tor easy 
use. PHD-I is a comprehensive horse racing system for 
picking overlays in thoroughbred sprint races (less that 1 
mile). 'his system has been tested using hundreds of races 
from the daily racing torm tor both maior and minor tracks 
in the US ft consistently yields a lirgi positive return. 
Detailed printouts of our statistics are available This 
program features 

• Automatic keyboard debounce 

• Verification display of each horse's parameters prior to 
entry for easy error correction. 

• The win probability and correct odds for each horse. 

• Bubble-sort routine for final display 

• Line printer output option 

• Complete users manual with examples and tips on betting 
and money management. 

Sit down with your TRS-80' and the daily racing lorm the 
night before the race and answer 5 or 6 questions about each 
horse's past performance The computer then accurately 
predicts the win probability and odds-line for each horse 
allowing you to spot overlaid horses while at the track The 
users manual contains a complete explanation of overlay 
betting. 

ORDER NOW AT THIS SPECIAL INTRODUCTORY PRICE AND 
RECEIVE A COPY OF OUR MAGAZINE ABSOLUTELY FREEI 

PN0-I 10k Level II Cntitti J19.95 

Make checks payable to 

Jm Cwnputtr 

227 1 3 Vintun Bwltvird, Suite F ^193 

Woodlind Hills. Cilll. 91364 

'TRS-80 is a registered trademark of Tandy Corporation 



SUPERIOR SOFTWARE PACKAGES 
DISK BASED TRS-80* 

SMARTTERM »$79.95 

UNQUESTIONABLY THE BEST 

SMARTTERMINAL PACKAGE 

FOR THE TRS-80 

•True Break Key 

•Auto Repeat (Typomatic) keys 

•Programmable 'soft' keys 

• Forward/Reverse Scrolling 

Multipage Display 
•Transmit from Disk File, Screen 
or Buffer 

• Receive to Disk File, Buffer or printer 

• Multi Protocol Capability 

SPOOL-80 • $39.95 

A TRUE DISK-TO-PRINT DESP00LER 
FOR THE TRS-80 

• Print Disk Files While Running 

Other Programs 

• Prints Compressed Basic Files 

• Includes RS-232 Driver for 

Serial Printers 

CALL US FOR YOUR CUSTOM 
SOFTWARE REQUIREMENTS 

MICRON, INC. ^73 Modem 

10045 Waterford Drive Versions 

Ellicott City. MD 21043 Available 

(301)461-2721 Soon 

*TRS80 is a Trademark of Tandy Corp. 
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Your display (Fig. 2) shows 
all the Z-80's registers, except 
the stack pointer and program 
counter. They are all initialized 
to zero to make it easy to see the 
effects of the instructions you 
type. 

At this point, I caution you: It 
is quite simple to blow up the 
Trainer. Entering jump instruc- 
tions will do it, as will messing 
with the stack pointer. Storing 
things in RAM, where the pro- 
gram is (4300 16 through 4760 16 ) 
can foul things up, too. 

To use the Trainer, you have 
to know what kinds of input it 
accepts. There are exactly three. 
The hexadecimal digits zero 
through nine and letters A 
through F form allowable ma- 



chine instructions. Secondly, 
the ENTER key tells the comput- 
er you want something EXECUT- 
ED. The third is the exclamation 
mark. If you make a typing error, 
press the "!", and your input will 
be erased. If you enter less than 
five bytes of machine instruc- 
tion, you have to press ENTER 
to make the program execute 
them. Table 1 reviews these 
commands. 

You've already seen that the 
Trainer sets all the registers to 
zero when you start out. With 
this in mind, type 3E01. Now 
press ENTER. You'll notice that 
the A register in the upper left 
hand corner of the display now 
contains a one. In this example, 
3E is the machine code for "load 



the next byte into the A 
register". Of course, the byte 
this time is 01. 

Now type in 0601 and press 
ENTER. A one appears in the B 
register. Type 80 and press 
ENTER. 80 is the machine in- 
struction for "ADD the contents 
of register B to register A." If all 
is well, there should be two in 



register A. 

With the TRS-80 Trainer you 
can enter up to five bytes of 
machine code at once. This ex- 
ample loads register A with five, 
register B with six and then adds 
the two. Note that as soon as 
you type the final zero, the com- 
puter displays the results. Try 
this by typing: 3E05060680.B 



Input Function/Use 

! Erases current instruction. Use it when you make a typing mistake. 

ENTER Signals the computer to execute the current instruction. It Ihe in- 
struction you have typed uses live bytes, the enter is nol needed. 

0-9. AF The hexadecimal digits used to input instructions to the TRS-80 
Trainer. 

Table 1. TRS-80 Trainer Input. 







Program 


Listing 


43D3 213451 
43D6 3A4946 


00910 
00920 


LD 
LD 


HL.SCRBUF+308 
A, (SE1I 










43D9 CD2346 


00930 


CALL 


DISPR 










43DC 216451 


00940 


LD 


HL.SCRBUF+356 










43DF 3A4C46 


00950 


LD 


A, (SHI) 


4309 


00140 


ORG 


4 3 9911 


43B2 CD2346 


00960 


CALL 


DISPR 


4309 210158 


00150 


l,D 


HL.SCRBUF 


43E5 2174S1 


60970 


LD 


HL.SCRBUF +37 2 


4383 110156 


00160 


LD 


DE.SCRBUFtl 


43E9 3A4B46 


68989 


LD 


A, (SL1) 


4306 010004 


00170 


I.D 


BC.490H 


43EB CD2346 


00990 


CALL 


DISPR 


4309 3620 


00180 


LD 


(III.), 2011 


43EB 21D5S1 


01000 


LD 


HL.SCWKIF+469 


430B BD80 


90190 


LDIR 




43P1 3A5346 


01010 


LD 


A, (SI) 


4300 215546 


B020B 


LD 


HL.TEXT 


43F4 CD2346 


01020 


CALL 


DISPR 


4310 111950 


00210 


r.D 


DE,SCRBUF*25 


43F7 21E451 


01630 


LO 


HL.SCRBUF+484 


4313 010E00 


00220 


LD 


BC.0EH 


43FA 3A5446 


91840 


LD 


A, (SR) 


4316 EDB0 


00 23 


LDIR 




43FD CD2346 


010S8 


CALL 


DISPR 


4310 115353 


00240 


LD 


DE.SCRBUF+851 


4400 215752 


81060 


LD 


IIL.SCRBUF+599 


431B 010C00 


00259 


LD 


BC.0CH 


4403 3A4B46 


01070 


LD 


A, (SIX+1) 


431E EDB0 


99260 


LDIR 




4406 C02346 


01080 


CALL 


DISPR 


4320 216F46 


99270 


LD 


HL.L1 


4409 215F52 


01090 


LD 


HL.SCRBUF+607 


4323 118050 


00280 


LD 


DE.SCRBUF4-128 


440C 3A4D46 


01100 


LD 


A, (SIX) 


4326 013400 


00290 


LD 


BC.52 


440F CD2346 


01116 


CALL 


DISPR 


4329 EDB0 


00309 


LDIR 




4412 219752 


81126 


L0 


HL.SCRBUF+663 


432B 11C050 


00310 


LD 


DE,SCRBUF+192 


4415 3A5046 


61136 


I.D 


A, (SIY + 1) 


432E 013400 


00320 


LD 


BC.52 


4418 CD2346 


81140 


CALL 


DISPR j 


4331 EOB0 


09330 


LDIR 




441B 219F52 


01150 


LD 


HL,SCRBUF*671 


4333 110051 


00340 


LD 


DE.SCRBUF+256 


441E 3A4F46 


01160 


LD 


A, (SIY) 


4336 013400 


00350 


LD 


BC.52 


4421 CD2346 


01170 


CALL 


DISPR 


4 339 EDB0 


09369 


LDIR 




4424 CD0846 


91189 


CALL 


HOVE ;MOVE DISPLAY TO SCREEN 


433B 114051 


00370 


LD 


DE,SCRBUF+320 




91196 


(THIS SETS UP 


FOR ACCEPTING AN INSTRUCTION 


433E 013400 


00380 


LD 


BC.52 




91299 


;HL -> DISPLAY 


AREA, DE -> EXECUTE B IS MAX BYTES 


4341 EDB0 


00390 


LDIR 




4427 21603F 


01219 


LD 


HL.SCRTOP+B64 


4343 11D351 


00400 


LD 


DE.SCRBUF+467 


442A 115947 


91229 


LD 


DE,INSTR 


4346 011100 


00410 


LD 


BC,17 


442D 0605 


91239 


LD 


B, 5 


4349 BDB0 


00420 


LDIR 




442F C5 


01249 


READ PUSH 


BC 


434B 115452 


00430 


LD 


DE,SCRBUF*596 


4430 CD9A44 


61256 


CALL 


HXIK ;READ ONE HEX BYTE 


434E 010300 


08440 


LD 


BC,93H 


4433 CI 


81260 


POP 


BC 


4351 EDB0 


00450 


LDIR 




4434 DA3B44 


01270 


JP 


C, FINIS 


4353 119452 


00460 


LD 


DE.SCRBUF+669 


4437 12 


01280 


LD 


(DE) .A 


4356 019300 


00478 


LD 


BC.03H 


4438 13 


01290 


INC 


DE 


4359 EDB0 


00480 


LDIR 




4439 10F4 


01300 


DJNZ 


READ 




00490 


I THIS CODE PUTS USER REG VALUES IN THE DISPLAY 




91310 


;NEXT CODK GETS USER REGS SET UP 


435B CD4145 


00500 


SHOW CALL 


HEXR 1 DISPLAY HEX VALUES 


443B ED735146 


01320 


FINIS LD 


(SSP) ,SP 




00S10 


(REST OP CODE 


DOBS BINARY VALUES 


443F 313D46 


01330 


LD 


SP,SF 


43SE 218350 


005 20 


LD 


HL,SCRBUF«131 


4442 3A5346 


01340 


LD 


A, (SI) 


4361 3A3E46 


00530 


LD 


A, (SA) 


4445 ED47 


01350 


LD 


I, A 


4364 CD2346 


00540 


CALL 


DISPR 


4447 3A5446 


01360 


LD 


A, (SR) 


4367 219350 


00550 


LD 


HL.SCRBUF+147 


444A ED4F 


81370 


LD 


R,A 


436A 3A3D46 


00560 


LD 


A, (SF) 


444C Fl 


01380 


POP 


AF 


436D CD2346 


00570 


CALL 


DISPR 


444D CI 


01390 


POP 


BC 


4370 21C350 


00580 


LD 


HL.SCRBUF+195 


444E Dl 


B1480 


POP 


DE 


4373 3A4046 


00590 


LD 


A, (SB) 


444F Bl 


01410 


POP 


HL 


4376 CD2346 


00600 


CALL 


DISPR 


4450 68 


01426 


EX 


AF.AF 1 


4379 21D350 


00610 


LD 


HL.SCRBUF+211 


4451 D9 


61436 


EXX 




437C 3A3F46 


00620 


LD 


A, (SO 


4452 Fl 


01440 


POP 


AF 


437P CD2346 


00630 


CALL 


DISPR 


4453 CI 


01458 


POP 


BC 


4382 210351 


00649 


LD 


HL.SCRBUF-. 25 9 


4454 01 


61460 


POP 


DE 


4385 3A4246 


00650 


LD 


A, (SD) 


4455 El 


81470 


POP 


HL 


4388 CD2346 


00669 


CALL 


DISPR 


4456 08 


01480 


EX 


AF.AF' 


438B 211351 


00670 


LD 


HL,SCRBUP+275- 


4457 09 


01490 


EXX 




438E 3A4146 


00680 


LD 


A, (SE) 


4458 DDE1 


81500 


POP 


IX 


4391 CD2346 


00690 


CALL 


DISPR 


445A F0E1 


81510 


POP 


IY 


4394 214351 


00790 


LD 


HL.SCRBUF* 3 23 


445C ED7B5146 


01520 


LD 


SP, (SSP) 


4397 3A4446 


■ 0710 


LD 


A, <SH) 


4460 C05947 


01539 


CALL 


INSTR ; EXECUTE USER INSTRUCTION 


439A CD2346 


00720 


CALL 


DISPR 




01540 


;NEXT CODE SAVES USER REGS 


439D 215351 


80730 


LD 


HL.SCRBUP+339 


4463 ED735146 


61558 


LD 


(SSP) , SP 


43A0 3A4346 


09740 


LD 


A, (SL) 


4467 315146 


01560 


LO 


SP,SIY*2 


43A3 CD2346 


■ 9759 


CALL 


DISPR 


446A PDE5 


01570 


PUSH 


IY 


43A6 21A4S0 


90760 


LD 


HL.SCRBUP+164 


446C DDES 


91589 


PUSH 


IX 


43A9 3A4646 


99770 


LD 


A, (SAD 


446E 08 


01590 


EX 


AF.AF' 


43AC CD2346 


9*789 


CALL 


DISPR 


446P D9 


01609 


EXX 




43AF 21B450 


99790 


LD 


HL.SCRBUF+180 


4470 E5 


01619 


PUSH 


HL 


43B2 3A4S46 


09809 


LD 


A, (SF1) 


4471 DS 


01620 


PUSH 


DE 


43B5 CD2346 


00810 


CALL 


DISPR 


4472 C5 


01630 


PUSH 


BC 


43B8 21E450 


00829 


LD 


HL.SCRBUF+226 


4473 PS 


61640 


PUSH 


AF 


43BB 3A4846 


90839 


LD 


A,(SB1) 


4474 08 


01650 


EX 


AF.AF' 


43BE CD2346 


90840 


CALL 


DISPR 


4475 D9 


01660 


EXX 




43C1 21F4S0 


00850 


LD 


HL.SCRBUF+244 


4476 B5 


01670 


PUSH 


HL 


43C4 3M746 


98868 


LD 


A, (SCI) 


4477 D5 


B1660 


PUSH 


DE 


43C7 CD2346 


00879 


CALL 


DISPR 


4478 C5 


01690 


PUSH 


BC 


43CA 212451 


00880 


LD 


HL.SCRBUF+292 










43CO 3A4A46 


00990 


LD 


A, (SD1) 










4300 CD2346 


09909 


CALL 


DISPR 








Program continues 
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IMMEDIATE DELIVERY — FROM ORANGE MICRO 

BASE 2 PRINTER 

*699°° 




TELEVIDE0 912C 

$ 799°° 

STANDARD FEATURES (partial list) 

• Reverse video, Underline, Blinking, 

Reduced 

• Protected fields, Security Blank fields. 

• Block or Conversational modes. 

• Editing: Line or Character; Insert /Delete. 

• Tab, Backtab; Columnar tab. 

• 14 key numeric pad with return key. 

• RS232 Printer Port 

• Deluxe Selectric® Keyboard 

OPTIONAL 

• 2nd Page Memory; W 

• 11 Special function keys and 

8 edit keys: 70°° 



^feff 




FEATURES: 

• 72. 80. 96. 120 or 132 Columns per line. 

• Bi-directional, 7 dot matrix, impact. 

• Graphics Capability. 

• RS232. Centronics*. IEEE-488, 20 ma. 

• 60 LPM / Fast feed. 

• User Programmable Character Fonts. 

• 16 Baud Rates - to 19,200. 

• Expanded Characters. 

Interfaces to TRS80, Apple, 
Atari, PET and most other 
computers. 



TOLL FREE 
ORDERING 



k-296 



Phone orders WELCOME. Same day shipment lor VISA and MASTER CHARGE. 
Personal checks require 2 weeks to clear Add 3% for shipping and handling. CA 
residents add 6%. Manufacturer's warranty included. Prices subject to revision. 




_, . _ COMPARE QUALITY, 

9 o°ISiN^? E UP FUTURES & DISCOUNT 



$ 179 



00 



QUME letter-perfect printer 
45CPS, receive only S 2499° ° 



TOLL FREE 

(800) 854-8275 

CALIF. ONLY (714) 630-3322 



Orange 
micro _ , 

[P.O. Box 2076, Yorfaa Linda, CA 92686 J 




PPI-80 

y / / 

PARALLEL I/O 
^ FOR THE TRS-80 

/ / 

Tht PPI-eO » • SawatHl p«M I/O Martoc* MgnM spacll oaiy tor tM 
TRS-eO, coneletng el 1 complete I Bfl I/O porii rwludktg aucn toiuri ea 

• switch selectable address decoding 

• complete on board regulated power supply 

• TTL compatible i tinea conveniently available through 16 pm sockets 

• -5 volts and ground at each socket 

• 3 software selectable modes of operation 

• handshaking 

• plugs into keyboard or expansion interlace 

• on board kiuge area tor experimenting 

• provisions for interlacing Sears-BSR-RS home controller 

•oaatoie applications include: 

• bidireciionai communication between microcomputers 

• parallel printer interface 

• wireless home control via BSR home controller 

• direct control ol lights appliances and motors 

• mierlaces to many popular boards including A D-D A convener 

and an EPROM Programmer 

PPi-fB • available now and can be purchased In several torn 

Completely assembled and tested ..$11995 

Complete kit with all pans .89 95 

Bare board drilled and etcned with assembly manual 25 95 

Accessories 

6 channel A D • 2 channel D A by Optimal Technology $115 00 

EPROM Programmer Model EP 2A 79 by Optimal Technology 155 00 

To order send payment plus $2 00 shipping and handling io 
QUANT SYSTEMS 
P.O. BOX 621 
CHARLESTON. IC 2M02 

S 1 mean <e> r>. ukn m 
▲ Onrw earn *M Si iv .1 „*< 


O"" *L 






Y^uontN 
,?ys t ems 


po. box 628 
Charleston sc 

ItvHHsk 29402 



I TRS-80* J 




t.r 



When you buy your 
TRS-80™ equipment! 




*M-1 



SALES COMPANY 

t-* W'HDDff 
• U SOX MM •fcNSACOLA Ft liVOk 
M4/4394M7 
riaHlfinxMri 1 tOOt74 1M1 



TIRED OF PLAYINC; CAM IS 
WITH YOUR TRS-80'? 



Ready to let your personal computer do some 
real work (or you? Then you're ready for 
MICROCHECK-BO, an exceptionally useful and 
usable checking account handler (or 16K Level 
II systems. Many products have lots of fancy 
glitter, but leave out essential functions. Not 
MICROCHECK -801 It gets the job done without 
unneeded gimmicks, using a minimum of hard- 
ware and human effort. The programs lead 
you step-by-step through each operation, and 
supporting documentation is excellent. 

With MICROCHECK -80 your outstanding checks 
and deposits can be kept as current as desired, 
and month-end account balancing is a snap. 
Cancelled checks are stored on cassette, ready 
to be listed at any time on either the video dis- 
play or, If you have one, a line printer. A 
special feature allows each check to be given a 
code Identifying the category of expense (e. g. , 
food, medical, contributions, etc.), and the 
codes supplied with the system are easily tai- 
lored to individual requirements. Cancelled 
checks can be listed by expense category, by 
month, by any combination of the two, or in 
total. Also, a summary of expense categories 
is provided. Checks are normally maintained 
in check number order, but another special 
feature permits sorting and listing by any field 
in the cancelled check record; these Include 
date, amount, payee, and expense category. 

Why not throw away your checkbook and let 
MICROCHECK -80 do the arithmetic and record- 
keeping for you? $19.95 postage paid. Send 
check of money order, or write for detailed 
information: 

SUMA MICROWARE ^-267 
1110 WEST 41st STREET 
LA GRANGE. ILLINOIS 60.525 

• A trademark of Tandy Corporation 
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Program continued 






4586 CD1445 
4S89 214246 


02959 CALL HEXOUT 
02969 LD HL,SD 












458C 110C51 


0297B LD DE.SCRBUF+26 8 




4479 PS 


11798 


PUSH 


AP 


4S8F CD1445 


02988 CALL HEXOUT 




447A ED57 


81719 


u> 


A, I 


4592 214146 


82990 LD HL.SE 




447C 325346 


91728 


LD 


(SI), A 


4595 111C51 


03999 LD DE,SCRBUF«284 




447F EDSF 


817 38 


LD 


A,R 


4598 CD144S 


03010 CALL HEXOUT 




4481 325446 


91746 


LD 


(SR) , A 


459B 214A46 


03020 LD HL.SD1 




4484 ED7B5146 


91759 


LD 


SP, (SSP) 


459E 112D51 


03030 LD DE.SCRBUF+301 




4488 3Elf 


91769 CLEAR 


LD 


A,* »CLEAR USER INSTRUCTION AREA 


45A1 CD1445 


03040 CALL HEXOUT 




448A 215947 


91779 


LD 


HL.INSTR 


45A4 214946 


B3B50 LD HL.SE1 




448D 115A47 


91789 


LD 


DE.INSTR+1 


4SA7 113D51 


03060 LD DE,SCRBUF«317 




4491 111481 


91799 


LD 


BC,4 


4SAA CD144S 


03070 CALL HEXOUT 




4493 3CII 


91899 


LD 


(HL) ,0 


45AD 214446 


030BB LD HL.SH 




4495 EDBI 


91816 


LDIR 




45B0 114C51 


03099 LD DE,SCRBUF*332 




4497 C35B43 


91828 


JP 


SHOW i CONTINUE 


4SB3 CD144S 


03100 CALL HEXOUT 






91836 (THIS 


CODE ACCEPTS ONE HEXADECIMAL BYTE 


45B6 214346 


03110 LD HL,SL 






61846 lA CARRIAGE RETURN ENDS CURRENT INSTRUCTION 


45B9 115C51 


03120 LD DE,SCRBUF*34B 




449A CDD544 


91856 HXIN 


CALL 


CHAR 


4SBC CD1445 


03130 CALL HEXOUT 




449D PEtD 


81866 


CP 


0DH 


45BF 214C46 


03140 LD ML , SHI 




449F CACE44 


81879 


JP 


Z , SETLST 


4SC2 116DS1 


03150 LD DE,SCRBUF*365 




44A2 32D344 


01889 


LD 


(CI), A 


45C5 CD1445 


03160 CALL HEXOUT 




4 4 AS CDD544 


91899 


CALL 


CHAR 


4SC8 214B46 


03170 LD HL,SL1 




44A8 FEBD 


01999 


CP 


0DH 


45CB 117D51 


03180 LD DE.SCRBUF+381 




44AA CACE44 


91919 


JP 


Z , SETLST 


4SCE CD1445 


03190 CALL HEXOUT 




44AO 32D444 


91929 


LD 


(C2),A 


4SD1 215346 


03200 LD IIL.SI 




44DI 3AD344 


01939 


LD 


A, (CI) 


45D4 11DES1 


03210 LD DE,SCRBUF*478 




1 44B3 CD0545 


91946 


CALL 


HEXIT 


45D7 CD1445 


03220 CALL HEXOUT 




44 BC CB27 


91959 


SLA 


A 


45DA 215446 


03230 LD IIL.SR 




44B8 CB27 


01960 


SLA 


A 


45DD 11ED51 


03240 LD DE.SCRBUF+493 




44BA CB27 


01970 


SLA 


A 


45E9 CD1445 


93259 CALL HEXOUT 




44BC CB27 


01980 


SLA 


A 


45E3 214E46 


03260 LD HL.SIX+1 




44BE F5 


01999 


PUSH 


AF 


45E6 116852 


03270 LD DE.SCRBUP+616 




44BF 3AD444 


92696 


LD 


A,(C2) 


45E9 CD1445 


0328 B CALL HEXOUT 




44C2 CDBS4S 


02010 


CALL 


HEXIT 


45EC 214D46 


0329B LD HL,SIX 




44CS CI 


02020 


POP 


BC 


45EF 116A52 


03300 LD DE.SCRBUP+618 




44C6 81 


02030 


ADD 


A,B 


45F2 CD1445 


03310 CALL HEXOUT 




44C7 47 


92949 


LD 


B,A 


4SF5 215046 


03320 LD HL.SIY+1 




44C8 3E8f 


92959 


LD 


A,0 


45F8 11A852 


03330 LD DE.SCRBUF+686 




44CA CB27 


92969 


SLA 


A 


45FB CD1445 


03340 CALL HEXOUT 




44CC 78 


92979 


LD 


A,B 


45FE 214F46 


03350 LD HL.SIY 




44CD C9 


92986 


RET 




4601 11AA52 


03360 LD DE,SCRBIIF»682 




44CE 3EFP 


82699 SETLST 


LD 


A.0FFH 


4604 CD1445 


03379 CALL HEXOUT 




44D0 CB27 


92190 


SLA 


A 


4607 C9 


03381 RET 




44D2 C9 


•2119 


RET 






03390 jTHIS CODE MOVES SCREEN BUFFER TO R.S. SCREEN 


AREA 


44D3 II 


92126 CI 


DEPB 


• 


4608 210050 


0340 MOVE LD HL.SCRBUF 




44D4 (8 


92138 C2 


DEPB 


B 


460B 11003C 


03410 LD DE.3C00H 






82140 jTHIS 


CODE CALLS R.S. KEYBOARD ROUTINE 


469E 010004 


03420 LD BC.400H 




44DS DS 


02159 CHAR 


PUSH 


DE 


4611 EDB0 


03430 LDIR 




44D6 FDE5 


92160 


PUSH 


IY 


4613 C9 


03440 RET 




44D8 CD2B00 


•2178 AGN 


CALL 


2BH 


4614 215947 


03450 LD HL,INSTR 




44DB B7 


62189 


OR 


A 


4617 115A47 


03460 LD DE.INSTR+1 




44DC 28FA 


62190 


JR 


Z.AGN 


461A 010400 


•3470 LD BC,4 






02200 |IF NONZERO HAKE SURE IT'S HEX OR CR 


461D 3E00 


034B0 LD A,0 




44DE FDE1 


02210 


POP 


IY 


461F 77 


0349B LD OIL), A 




44EI Dl 


02220 


POP 


DE 


4620 EDB0 


03500 LDIR 




44E1 FE1D 


02210 


CP 


0DH 


4622 C9 


03510 RET 




44E3 CA0445 


02240 


JP 


Z,RET2 




03520 )THIS CODE DOES BINARY REGISTER DISPLAY 




44E6 FE21 


02250 


CP 


21H 


4623 0608 


03530 DISPR LD B,0BH 




44E8 CA1F4S 


02260 


JP 


Z.KILLIT 


4625 CB27 


03540 SHIFT SLA A 




44EB PE3» 


02270 


CP 


Ha 


4627 D43146 


03550 CALL NCZERO 




44ED FADS44 


02280 


jp 


M.CHAR 


462A DC3746 


03560 CALL CONE 




44F8 FE3A 


92290 


CP 


3 AH 


462D 23 


03570 INC HL 




44F2 F2P844 


82399 


jp 


P.TRY41 


462E 10F5 


03580 DJNZ SHIFT 




44FS FAI24S 


02310 


jp 


M.RET1 


4630 C9 


03590 RET 




44F8 FE41 


02329 TRY41 


CP 


41H 


4631 F5 


03660 ZERO PUSH AF 




44FA FADS44 


92339 


JP 


M.CHAR 


4632 3E30 


03610 LD A.30H 




44FD FE47 


92349 


CP 


(71 


4634 77 


03620 LD (HL).A 




44FF F2DS44 


02359 


JP 


P.CHAR 


4635 PI 


03630 POP AF 




4502 77 


92366 RET1 


I.D 


(HL) ,A 


4636 C9 


03640 RET 




45(3 23 


02376 


INC 


HL 


4637 F5 


03650 ONE PUSH AF 




4514 C9 


92389 RET2 


RET 




4638 3E31 


• 3660 LD A, 3111 




4SIS FE48 


92390 HEXIT 


CP 


40H 


463A 77 


03670 LD (111.), A 




4SI7 FA8C45 


02400 


JP 


M, ZAPHI 


463B Fl 


03680 POP AF 




4S(A C6B9 


02419 


ADD 


A, 9 


463C C9 


03690 RET 




45»C E6IF 


•242( ZAPHI 


AND 


0FH 




037 00 )NEXT ARE USER REG STORAGE AREAS 




458E C9 


• 2430 


RET 




463D 00 


•3718 SF DEFB 




45IF Fl 


02440 KILLIT 


POP 


AF 


463E 00 


03720 SA DEFB 




4518 Fl 


02450 


POP 


AF 


463F 00 


037 30 SC DEFB B 




4511 C38B44 


02466 


JP 


CLEAR 


4640 00 


03740 SB DEFB • 




4514 7E 


02470 HEXOUT 


LD 


A, (HL) 


4641 00 


03750 SE DEFB 




4515 F5 


02488 


PUSH 


AF 


4642 00 


•3760 SD DEFB 




4516 CB3F 


02490 


SRL 


A 


4643 •■ 


•3771 SL DEFB • 




4518 CB3F 


92599 


SRL 


A 


4644 •• 


037 80 .'ill DEFB 




4S1A CB3F 


92519 


SRL 


A 


4645 10 


•3790 SF1 DEFB t 




451C CB3F 


92526 


SRL 


A 


4646 00 


031100 SA1 DEFB 




451E FE9A 


92539 


CP 


•AH 


4647 00 


B3B1B SCI DEFB 




4S2I F22845 


92549 


JP 


P,A1 


4648 00 


03820 SB1 DEFB 




4523 EE3S 


02550 


XOH 


3(H 


4649 00 


01830 SE1 DEFB 




4525 C32C45 


■ 256* 


JP 


ST1 


464A 00 


03B40 SD1 DEFB 




4528 D699 


02570 Al 


SUB 


9 


464B •• 


B3BS0 SL1 DEFB 




452A EE48 


02589 


XOR 


40H 


464C 00 


B3B60 SHI DEFB 




452C 12 


02590 ST1 


LD 


(DE) ,A 


464D 0000 


B3B70 SIX DEFW 




452D 13 


02690 


INC 


DE 


464F 000B 


03880 SIY DEFW 




452E Fl 


02610 


POP 


AF 


4651 B000 


B3B90 SSP DEFW 




452F E60F 


02620 


AND 


0FH 


4653 B0 


B3900 SI DEFB • 




4531 FE9A 


02630 


CP 


11 


4654 00 


0391B SR DEFB 




4533 F23B45 


02640 


JP 


P,A2 




B392B /FOLLOWING DEFINES SCREEN DISPLAY 




4536 EE3I 


02650 


XOR 


3BH 


4655 54 


B3930 TEXT DEFM 'TRS-B0 TRAINERJNSTRUCTION : ' 




4538 C33F45 


02660 


JP 


ST2 


5000 


B394B SCRBUF F.QU 500011 




453 B D699 


02670 A2 


SUB 


9 


466F 41 


B395B LI DEFM 'A - F - Al- 


Fl-' 


4 5 3D EE4I 


02680 


XOR 


4(11 


46A3 42 


03960 DEFM 'B - C - Bl- 


CI-' 


453F 12 


02690 ST2 


LD 


(DE),A 


46D7 44 


03970 DEFM 'D - E - Dl- 


E1-" 


4548 C9 


02700 


RET 




470B 48 


03980 DEFM 'H - I. - 111- 


L1-' 




92719 ;NEXT 


CODE DOES 


HEX REGISTER DISPLAY 


473F 49 


03990 DEFM 'I- R- ■ 




4541 213E46 


02720 HEXR 


LD 


HL.SA 


4750 49 


•4000 DEFM 'IX-IY-SP-' 




4544 118C58 


12731 


LD 


DE.SCRBUF+148 


4759 0BBB 


•4B1B INSTR DEFW 




4547 CD1445 


0274* 


CALL 


HEXOUT 


475B 0000 


04020 DEFW ■ 




454A 213D46 


02750 


LD 


HL.SF 


475D 00 


•4(31 DEFB • 




4S4D 119C50 


02760 


LD 


DE.SCRBUF+156 


475E C9 


04040 DEFB 0C9H 




4559 CD1445 


■ 2771 


CALL 


HEXOUT 


3C00 


04050 SCRTOP EOU 3C00H 




4553 214646 


■27 M 


LD 


HL.SA1 


0000 


04060 END 




4556 11A0S9 


• 27 90 


LD 


DE,SCRBUF*17 3 


00000 TOTAL 


ERRORS 




4SS9 CD1445 


02800 


CALL 


HEXOUT 








45SC 214546 


• 2816 


LD 


HL.SF1 








455F 11BD5B 


82B28 


LD 


DE,SCRBUF+1B9 


Al 4528 


02570 02541 




4S62 CD1445 


02830 


CALL 


HEXOUT 


A2 453B 


02670 0264B 




4565 214646 


02840 


LD 


HL.SB 


AGN 44D8 


02170 02190 




4568 11CCS9 


02B50 


LD 


DE.SCRBUF+2B4 


CI 44D3 


•2121 91866 (1931 




456B CD1445 


02860 


CALL 


HEXOUT 


C2 44D4 


12131 11920 02000 




456E 213F46 


0287B 


LD 


HL,SC 


CHAR 44D5 


02151 01858 01898 02288 02330 02350 




4S71 11DC58 


02880 


LD 


DE.SCRBUF+229 


CLEAR 44BB 


01760 02461 




4574 CD1445 


02890 


CALL 


HEXOUT 


DISPR 4623 


03530 00540 11570 00600 ••631 60660 96690 ■■72* 




4577 214846 


02990 


LD 


HI, 80)1 




00750 B0780 (1810 00840 00870 009(0 00930 




4S7A 11ED5» 


• 2911 


LD 


DE.SCRBUF+2.37 




08968 0(990 (1121 01050 (1(80 01110 01141 




457D CD1445 


92929 


CALL 


HEXOUT 




01170 




4589 214746 


02939 


LD 


HL.SC1 








4S83 11FDS8 


92949 


LD 


DE,SCRBUP+253 
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Program 


continued 














FINIS 


443B 


11321 


61279 














HEX IT 


4515 


• 239t 


• 194* 


82818 












HEX0U1 


4514 


■ 2471 


8 2748 


62771 


■ 2811 


92839 


•2861 


82898 


■ 2921 








• 2956 


• 29 86 


• 3(18 


• 3646 


13(71 


83188 










83168 


•3191 


(3221 


13251 


83288 












83376 














HEX* 


4541 


■ 2721 


88581 














HXIN 


449A 


81851 


81256 














IMSTR 


4759 


84818 


61228 


• 1531 


11771 


■ 1781 


83459 






KILLI1 


4SIP 


82446 


•2261 














LI 


466r 


61956 


1(276 














MOVE 


46BB 


63466 


81JB9 














ONE 


4*37 


63656 


63566 














READ 


442P 


81246 


61366 














RET1 


45f2 


62366 


62316 














I RET2 


4584 


62386 


62246 














SA 


463E 


•3726 


66536 


•272* 












SA1 


4646 


• 3888 


• •771 


•27 88 












SB 


4641 


• 3741 


68598 


82848 












SB1 


4641 


13821 


66836 


82988 












SC 


463F 


• 3738 


86626 


82B7B 












SCI 


4647 


63818 


66866 


82939 












SCRBUP 


5111 


63948 


6*1S( 


99168 


M2K 


• •241 


((288 


■ •31* 


88348 








• •378 


1(411 


98439 


•■461 


98528 


• •551 


1(568 








• 8616 


88646 


99678 


61781 


(•7 31 


M76t 


■1791 








88828 


88858 


88888 


88919 


■ •941 


88978 


81888 








61836 


81868 


81998 


• 112* 


•1151 


• 273* 


■ 2761 








627 9* 


82828 


(2856 


• 2888 


82916 


■ 2946 


■297* 








13666 


63636 


83868 


83698 


83128 


■ 3151 


83186 








832K 


83248 


83279 










SCRTOP 


3Clt 


84656 


• 1216 














SO 


4642 


•3761 


86658 


• 2961 












SD1 


464A 


83848 


88898 


•3B2( 












SE 


4641 


•375* 


86688 


92998 












SE1 


4649 


• 3836 


68926 


93658 












SETLST 


44CB 


82698 


• 1878 


91919 












sr 


463D 


63716 


66566 


9133B 














4645 


•3791 


88868 


92819 












SH 


4644 


• 378( 


■■711 


83686 














464C 


63868 


1195* 


93148 












SHIPT 


4625 


63548 
















SHOW 


415B 


66588 


• 1826 














SI 


4653 


83986 


inn 


• 1341 


91729 


93288 








SIX 


464D 


83876 


• 1876 


eiiBB 


63261 


•3291 








SIY 


464F 


83888 


11131 


• 1161 


11561 










SL 


4643 


63778 


88748 


13111 












SL1 


464B 


83B58 


88988 


93170 












SR 


4654 


83919 


1114a 


11361 


11741 










SSP 


4651 


63898 


11321 


11521 


11551 


11751 








ST1 


452C 


82598 


82568 














ST2 


453F 


• 2691 


62668 














TEXT 


4655 


13931 


88266 














TRY41 


44F8 


12321 


82366 














ZAPHI 


45IC 


• 242( 
















ino 


4631 


13666 


63556 
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TRS-80" *J^ 
SOFTWARE ^ 



NKC Model 3315 spinwriter 

for this NEW TRS-80 word procMsing software 




Thi SPINWRITEK prints io !■ 55 cMnctni (ir 

secant. Thf unique print element, called ■ print 
thimole. coetaiea up to 128 felly lotmetj 
duracters Clint rJuflkttac trial contain ap 
to 125 ena/actm have a cutoait so tlut 
tti8 i act characters pritnad are fttlty 
visible to the eoeratM 



$2,895 



DYSAN 



DISKETTES 

Ta« CaOillAC ol 
tee Flees* Disti 

■« Vmm law prtcit 



4" oi ' 1>i 1740/1 ioJ itea/stjl •entity $4 JO* 
I" <bo« cf 10) 37«0;10 apt sMe/dM eeesity (AS 

I" «bo« of S) 104/1 left sartor of 107/1 10 iKtsrs 

w IOS/1 16 sectors 4 50 




■ PSON TX-BO DOT MATRIX PRINT 

64 Graphic characters 7 5 dot matrix 
(7 6 in graphic) double width charac 
tars TRACTOR and FRICTION lead 
models with interface and cable for , 
PET. APPLE. RS232 available at 
OUR low prices. 

Tit SOFTWnnf: MICROSOFT AOVEflTUIIE — The sophisticated fajrtasyr' logic 
same Oar law price $27 

FILE MANAGEMENT SYSTEM — TIM professional Oats Ms* 
software by the btmrtott software company , S2I. 

UK 4T16 RAMM Da TPtS SO. APPLE • PET. ZENITH ana o*o computer* 

eeeata «lire JiOnecbetiei $65 00 
Prices s«kt»ct ta chMto wiikout notice __ .„.„-■•« 4 ... 

VISA awl MASTFP CfcAACE WELCOME Allow 2 Php ne (21 3|371 -1 660 

*«•»« •» etiMen check ta deer. 4 wmi foi m \ Mkmmm » |_fc *f^ 

;ers4V.si checks Add 2% for +■?.*•* awi hand I «f § I A^VIIL^rnLJ 
ng Cant res dean sdd 0% sales las. (Sot, rm K-| BUSINESS WUKID 
no COO) 

CooyilfM 1*0 • MICNO Buiaaos WORLO 



tlij 



ysjg 



PACKER: Automatically edits all or part of your 
Basic program to ease editing, run faster, or save 
memory. Has 5 sections: UNPACK -unpacks multi- 
ple statement lines into single statements maintain- 
ing program logic; inserts spaces and renumbers 
lines for easier editing. SHORT - shortens your pro- 
gram by editing out all REM statements, un- 
necessary words and spaces. PACK - executes UN- 
PACK and SHORT, then packs lines Into multiple 
statement lines; maintains program logic. 
RENUM — renumbers program lines including all 
GOTO's, etc. You specify increment. MOVE — moves 
any line or block of lines to any new location In the 
program and renumbers lines. Written in machine 
language; supplied on tape in 3 versions for 16K, 
32K, & 48K. For Level II or Disk Basic $29.95 

DISASSEMBLER: Read, write, and copy system 
tapes. Display and modify memory contents. 
Disassemble ROM, DOS, and system tapes into Z 80 
mnemonics. Search for strings in memory. Much 
more!! Includes 32 pages of documentation and in- 
formation. 

For 16K Level II S19.9S 

SYSTEM TAPE DUPLICATOR: Copy your system for- 
mat tapes. Includes verify routine. 
For any Level II $1 4.9S 

CHESDISK: Transfers your copy of Microchess to 
disk for quick and easy access. 
For any Level II Disk system $8.95 

CASSETTE LABEL MAKER: A mini-word processor 
to print cassette labels on a line printer. Includes 
manual and 50 peal-and-stick labels on tractor feed 
paper. 

For 16K Level II and printer S15.95 

INSTRUCTION MANUALS for any Cottage Software 
original programs available for 20% of program list 

?rice. Refundable when program purchased. 
RS-80" repairs and modifications. Call or write for 
info. MANY MORE items available. Call or write for 
catalog. DEALER inquiries invited. 
Kansas residents add 3% sales tax. Foreign orders 
in US Currency only. 
Call our 24-hour phone: 31 6-683-461 1 or write 

"TRS-80 Is a registered trademark ol TANDY CORP." 

COTTAGE SOFTWARE 

614 N.Harding ^233 
Wichita, KS 67208 



HEATH H14 
TRS 80 

NO SOFTWARE 
REQUIRED 

Serial Interface mounts inside and !• powered by 
expansion interface. Connects at parallel printer 
port. Easy installation. May be mad externally but 
require! *i V and */- 9 to 12 V. 

Uiei printer driver In Level II ROM. No software 
driver needed in high RAM. No more software 
compatability problems. 

a RS-2J2-C Interface Free for Other Uses a 

a Baud Rate Adjustable From 1200 to 4600 a 

a Handshaking Prevents Loit Characters a 

a Output Meets EIA RS-2>2-C a 

May be used with other serial printers which send 
Line Feed after Carriage Return. Data format is 1 
Start Bit, 8 Data Bits, 2 Stop Bits. 

-— Ordering Information — 

Kit With All Parts $24.95 

Printed Circuit Board With Instructions 12.95 

Assembled A Tested With 90 Day Warranty 39.95 

Please Include $1.50 Shipping and Handling 

(NOTE: RS-2J2 Connector Not Supplied) 

SPEEDWAY ELECTRONICS ^275 
135a Auburn 
Speedway, Indiana 46224 



From The _ 

Engineering Oroup 
A.* gsic: 




CASSETTE 
REMINDER 
INTERFACE 



NOW YOU CAM 
REWIND, FAST- 
FORWARD, OR 
INCREMENT TOUR 
TAPES EVEN WHEN HOT 
DOING A 'CLOAD', 'CSAVE' 
OR -SYSTEM' COMMAND. 

END THOSE CASSETTE 
TAPE HANDLING BLUES' 



ONLY .. 014.93 



« PAT ALL SKDTDC MO HMOLTJC OMKES. 

FEATURES! Adapts instantly to 

present system, precision toggle and 
momentary push-button switches, 
durable painted aluminum cabinet, 
high quality micro-plug and jack, 
non-slip rubber feet, does not 
interfere with normal system 
operation, compact design 
complements your system, 

SEW OCDX OR KKY ORDER TO: 
GRANITE STATE 
INSTRUMENT COMPANY *^ 93 
Bom 3486 
Nemnuat, NH 03061 

(i TMDOWK OF TNOY COVOMTION) 



* Reader Service — see page 162 
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GENERAL 



An additional index for Radio Shack's 

Editor/Assembler manual— cross-referenced for easy use. 



EDTASM Index 



Terry Kepner 
P.O. Box 481 
Peterborough, NH 03458 



Learning to program in as- 
sembly code is like trying to 
learn a foreign language; how 
long it takes will depend upon 
how good a reference book you 
have. 

If the book is well written with 
a good cross-reference listing 
the new words, their English 
equivalents and the pages 
where you can find their descrip- 
tions, you will learn the lan- 
guage more easily. If the book 
doesn't have these features, you 
have a hard trip ahead. 

Unfortunately, the Radio 
Shack Editor/Assembler Manual 
falls into the latter category. 
While it does provide an alpha- 
betic and a numeric opcode- 
mnemonic cross-reference list 
at the back, these two lists do 
not tell the user where their 
descriptions can be found. 

It took only a few frustrating 
hours before I decided to rectify 
the situation and produce a 
good cross-referenced index. 
However, this proved more dif- 
ficult than I had thought. 

The numeric cross-reference 
in the Radio Shack Editor/As- 
sembler is actually organized in- 
to three separate numeric lists. 
This meant, in addition to an 
alphabetic index, I also had to 
make a new numeric index, 
properly sorted. 



Creating the index, I discov- 
ered some errors in the Radio 
Shack manual, which are de- 
tailed as follows: 

LTheLD A,R(pg. 22) and LD 
R,A (pg. 23) mnemonics are not 
in the Radio Shack numeric and 
alphabetic indices. 

2. OUT (D),R (pg. 103) should 
be OUT (C),R. 

3. LD B,H,NN (pg. 121) should 
be LD B,H. 

I hope these indices are as 
useful to you as they have been 
for me. Since I am a beginner at 
assembly language program- 
ming, the time it took to prepare 
them has been more than repaid 
by the time saved finding infor- 
mation.! 



DOSE 95 
FD8E95 



80 
CE3I 

ED4ft 
EOSfi 

EC** 
ED7fi 
9S 

ooetes 
FMMS 



ROC 
ROC 



:•? 

DD29 

1*3? 

i MS 



hdo 
rod 

ROD 
*<• 
HOC 

no 

HOC' 

no 

H00 
HDO 
ROD 

no 

(DO 

ROD 

no 

H00 



no 

«* 



fi. (HL i 

ft. ux«iw» 
a <iv*iNt>> 

ft. a 
fl.c 
ft. i 

ft.t> 
ft.E 

ft. H 

A.L 

ft, N 
ML8C 

HL-DE 
HL, HL 
HL.SP 
ft, • «.> 
«. •IXHHt>) 

ft, (IV* two 

ft, ft 
rt. B 



H.C 

ft.D 



ft.H 
A.L 
R.N 
HL-BC 
HL.OE 
ML. ML 
ML.SP 
lx. BC 
IX, DC 
IX. IX 

lx. sp 

IV, BC 



FD1S 
FOi? 
FD39 
R6 

Donees 

FDRfoft5 



R4 

AS 

1629 

C846 

00086546 
FDC89S46 
C847 

CB4B 
CB41 
CB42 
CB4j 
CB44 
CB45 
CB4E 

ooceeME 

FDC8834E 
CB4F 

CB48 
C849 
C64R 
C646 
CMC 
C840 
C836 

Docsesx 

FDC 88556 
CB57 

LBN) 
CB51 
C652 

CB53 

C854 

CB55 

CB5E 

D0CB655E 

FDC8855E 

CB3F 

CB5B 

CB59 

cm 

C656 

CB5C 

C650 

C8« 

D0C88566 

FDC88566 

C86? 

esse 

CB61 
CB62 
CB63 
C864 

CB65 
CBSE 
D0CB856E 

FDcsestc 

CB6F 

CB68 
C869 
CB6ft 

CM 

CB6C 

C960 

CB76 

00088576 

FDC88576 

0877 



HOC' 
HOC 
ftOO 

m 

RNC 

no 
no 

*«> 
HMD 
HMD 

HNO 
RMO 

MP 

HNO 
BIT 
BIT 
BII 
BI1 



Bit 

BII 
BIT 
BIT 
BIT 
BIT 
BIT 
BIT 
BIT 
BIT 
BIT 
BIT 



BIT 
BIT 
BIT 



BIT 
BIT 
BIT 
BIT 
BIT 
BIT 
BIT 
BIT 
BIT 



BIT 
BIT 
BIT 
BII 
BIT 
BIT 



IV. K. 
IV. IV 
IV. SP 

(HL> 

<IX.IND> 
•IV. I NO' 



N 

B. (HL ' 
B, ' IX. I NO; 
8. (IV.IND) 
B.R 

e. b 
e, c 

8.0 



t. (HL) 

I. (IX'INO) 

l.( IV.IND) 

l.fl 

l.B 

1.C 

1,0 

IE 

l.H 

l.L 

2, (HL> 

2. <IX.IND> 

2, < IV.IND) 

2.R 

2.1 

2, C 
2.D 
2.E 
2.H 
2,L 

J. (ft) 

3. UX»IND> 
3. (IV.INO) 



J.D 
M 

3,H 

3.L 

4. (HL) 

4, ' I X- I NO ' 

4, (IV»IHD) 

4. ft 

4.B 
4,C 

4.0 

4.! 
4.H 
4.1 

5, (HL> 

5. (|X*IND) 

5. (IV.IND) 

5.R 

5.B 

5.C 

5,0 

3t( 

5. ft 
5.L 

6. (HL) 
6.UX.1ND) 
6, 'IV.IND) 
t.fi 



C87B 

C871 

C872 

CB73 

C874 

C675 

C87E 

00088571 

FDC8e57E 

C87f 

i 878 

C879 

CB7B 

C87B 

C87I 

CB7D 

003485 

FCS485 

D4B485 

C 06485 

£48485 

F 48485 

EC8485 

E 48485 

CC8485 

3f 

BE 

DDBE85 

FDBEe5 



BO 

fe;*i 

E0H9 

EM9 

EPM 

EOM 

2F 

2? 



D03S8S 
FD3S85 



DD2B 
F02B 



00E3 
FOE: 



DS 
76 

E046 
LD56 
ED5E 
E078 

D828 

1048 
ED48 
E0S8 
(.0** 



BIT 
BIT 
BII 
BIT 

BII 

BIT 

BIT 

BIT 

CHl- 

CHLL 

OMU 

CHI 
Crttl 
CALL 

CRIl 

Oil 

CKI 
CCF 

CF 



e.D 
t.t 

6-H 

6.L 

7. <NL) 

7. (1X*1N0> 

7. ( IV.IND 1 

7. ft 

7.B 

7.C 

7,0 



CNN 

H, NH 

NCHN 

NN 

N2.NN 

P. nil 

F-E.NN 

PCi.NN 

2>HH 



1]X«II«" 
•IV.IND' 



CF 
CF 
CF 
CF 
CF 
CP 

c*» 
trt* 

CM 

CK 
DHR 
DEC 
DEC 



UX.IND) 
( IV.IND' 



DJN? 


MS 


Fl 




EX 


(SP).I 


t>: 


(SP). 1 


EX 


• SP). 


LX 


HF.HF 


EX 


DE.HL 


EKX 




HftlT 




111 


8 


lrt 


1 


IP 


2 


IN 


ft. <C) 


IN 


ft. (N) 


IN 


K .1 


IN 


CCC) 


IN 


D. <C' 
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A specially designed SF TACTICAL BATTLE GAME for 
your PET, TRS-80 or APPLE Computer. 

The man called Sudden Smith watched the five blips on 
his screen spread out to meet the enemy. Two freighters 
converted into something like battlewagons, powerful 
but slow, and three real cruisers: the most powerful group 
of warships ever seen near the Promethean system - except 
for the Stellar Union fleet opposing them. Everyone was 
calling it Starfleet Orion, though it existed for only this 
day. It was life or death, and, after the object lesson on 
the planet Spring, everyone knew it. 

STARFLEET ORION is a complete 2 player game system 

• rule book • battle manual • cassette 

• ship control sheets • program listings 

Includes 2 programs, 22 space ship types, and 12 playtested 
scenarios. Game mechanics are extremely simple, but play 
is exciting, challenging, and rich in detail. Specify PET (8K), 
TRS-80 (Level II, 16K), or APPLE II (16K& 32K) $19.95. 
Ask your local dealer or send your check to: 

Automated Simulations 
Department M ^ 48 
P.O. Box 4232 
Mountain View, CA. 94040 

"TAS-80 It a registered trademark of TANDY CORP " 

California residents please add 6% sales tax 



msk your ii 

m 



SBm svsTEms, inc. 



►^154 



PROFESSIONAL BUSINESS SOFTWARE 

TO OPERATE ON 

TRS-80* COMPUTER 

• ISAM Accounting Package: 

- Accounts Payable, Accounts Receivable, 
General Ledger with Cash Journal, In- 
voicing and Payroll 

Integrated Accounting System $425.00 

Separate Modules $ 99.00 

• ISAM Inventory Control $125.00 

- Above Systems require 2 - 3 drive Systems. 

- Integrated System requires 3 - 4 drive Systems. 

- Systems operate under NEWDOS by Apparat 
(not included) 

• Machine Language Disk Sort $ 49.95 

— Multiple Keys - Ascending, Descending 
Callable under Basic 

• NEWDOS by Apparat $ 55.00 

TO ORDER CALL: 
(617)685-0151 

(Dealer Inquiries Welcome) 



masipi naige 




VISA 



P.O. Box 1225 • Haverhill, MA 01830 
* Trademark of Tandy Corporation 
** Accounting Package not available in the State of California. 



QUKKS6T 

GET YOUR WARP SPEED UP 




FOR REALLY FAST TRS-80* 

GRAPHICS 

• A cassette SOFTWARE addition to your 
TRS-80* level II BASIC. 

• Lett you draw graphic* with your computer 
the si me way you draw on paper. 

• Draw shapes, large alphabetical characters, 
etc. fen times laster, more easily and using less 
memory then level II. 

• SETs one graphic spot at a time. 

• Does not use strings or POKE. 

• Can be EDITed and SAVEd just like any other 
BASIC statement. 

• Draw the starshlp ENTERPRISE, above, begin- 
ning at any point on the screen, In 0.3 seconds 
(TRS-80 takes 4 seconds and uses twice as 
much memory). 

• No effect on your warranty. 

WINKING CURSOR 

• Play this cassette program into your TRS-80* 
and the cursor starts winking. 

• Also debounces your keyboard. 

• It keeps on winking until you turn the machine 
oil (not affected by NEW). 

jQS-1 QUICKSET on cassette $7.95 

WC-1 WINKING CURSOR on cassette $4.95 

| OW-1 Both on one cassette $9.95 

j Add $1.00 per order handling charge. 

(PA residents— add 8% tax) 

JMSCorp 

P.O. Box 18083 Pittsburgh, PA. 1S238 

(412)858-7017 

• TRS-80 il a trademark ol rha Radio SrAacti Dinaron ol Tandy Corporal 



JOIN THE FUN! 




t/>249 



XXou have toavcLCo nint mi\.t» tobau anb 
*ttu. have 116 to op Hfonc you ftcach the 
other* nbe of iht ship. Qou axe oeab Mncb, 
umm sCncn^&h. huj $mc, anb yutb at upu 
becibe to Ktt, out fnom. a nocM tUpt the 
most- deabLU Joe you've fac«6 to J*.* a §iant 
ttiLLtm tomato!'! f£>u k*»u.u, bent rjeeb this, 
especially ajten the n%z«,uL. ant CyLon tym 
just fought, out you have no choice in. tht 
matte*... Zht totnafio is at&ackitig! 

PHR5E MIL 

»> tf)e o^mt of yiET)CE nCTfOT) ar>d F»nr»*u,. 
1t 15 -the most unusual a/imc you will ever 
etai). Tf)e 5<tTtna 15 a 5poce Ration controlled 
Du o runaway computer, and t>our aoal 15 to 
survive. PHASE un 15 ryrT an adventure oame. 
tveru c^ome uou plou 15 different and a*, uou 
plat; uou become jtronoer and more powerful. 
Uyt)g both tne powtr$ of jciencc and maoic, 
H>e oame 15 ta5t- paced and exatina. PHASE UM 
ha$ been approved by the MISSOURI SOUTHERN 
STATE COLLEGE SCIENCE FICTION CLUB and 15 
bacfyed py two ueors of te?tiw- *>o Jain the 
fun! Don't be ny tejt on uour WocH to be 
Hilled bv a B.E.n. !* 

To oa6«*, make check pauahix to PHASE Ull 
anb matL to> FUTURFVlFu/ UNMflllTPP 
P.O. Box 1295 Joplin, mo. 0H0O1 ^279 
pLea.se specify youa compufceni 

TrVS-80 LEVEL I 16 K, oK 52 K 

apple I Plus u»k,o«32k 

APPLE I w/ Applesoft ROfl IfcKoa 

TRS-BO mod I lui, a $ame jo* TOI !) *3H. 05 

lValerj, send 1A.1C. for price lijt. 

« •uatvto-nowsTEP. *•<>•« Hi7>7K08B0 

rnneoMrE ociivekv . rf , . ^ . 

frunMwrfiP! Cafligragtof by Drwtt 



i3Zk J 



65 



TRS-80* STRUCTURED 
BASIC 

Now available for TRS-K0 disk systems 

UasWeVV.4 



A pre-compiler adding performed pro- 
cedures, case structures, repeat while, until 
and many other structured language state- 
ments lo the already powerful Level II 
BASIC. Diskette $50.00, Listing $35.00, 
Manual purchased separately $10.00. 



313 Meadow Lane 
Hastings, Michigan 49058 

(616) 945-5334 
(Dealer inquirieu invited) 

•"84 

VISA & MASTERCHARGE ACCEPTED 

■ TRS 80 ts d trademark ol Tandy Corp 
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OBJECT code 


HNEH0N1CS 


ec*8 


IN 


M.(C) 


EK8 


IN 


L.<C) 


34 


INC 


(HL> 


D03465 


I* 


(IXMND 


FD3465 


INC 


(IV.IND 


X 


INC 


A 


94 


IHC 


6 


■3 


INC 


K 


K 


INC 


C 


14 


INC 


b 


13 


INC 


It 


1C 


INC 


E 


24 


INC 


H 


23 


INC 


Hi 


W>2.i 


INC 


IX 


FM3 


INC 


IV 


2C 


INC 


L 


13 


INC 


SP 


EM* 


IND 




EDfift 


INC* 




E0ft2 


INI 




EDK 


MM 




ES 


» 


HL> 


DM9 


JP 


<IX> 


FDE9 


IP 


<1V) 


M»4«S 


ip 


CNN 


Ffl64« 


tp 


n.NN 


0284*5 


.ip 


NC. NN 


CJ8465 


ip 


NN 



CA8485 

3S2E 

IKE 
WSE 
SMI 
282E 

•2 

12 

•• 

r» 

a 

72 

7] 
~4 

75 

jeae 

0077*5 

DD79*5 

0071*5 

0072*5 

0073*5 

007485 

Ml 7585 

00368528 

F07785 

F07985 

F07185 

FD7285 

F07385 

F07485 

FD7565 

F 0368528 

328485 

£0438485 

E0538495 

228485 

00228485 

F 0228485 

ED73848S 

6fl 

lft 

7E 

D07£*5 

F07E85 



n 

78 

79 

Tfl 

7B 

7C 

ED57 

70 



46 

D046*5 

FD4640 

47 

48 
41 

4.' 
*S 
44 
45 

8628 

E0488485 

818485 

4£ 

004C85 

FD4E85 

4F 

46 

49 

48 

48 

« 

40 



NZ.NN 

p.hn 

PE.NN 

PO.NN 

Z, NH 

CDIS 

OIS 

NC.DIS 

NZ.DIS 

2, OIS 

'8C 'A 

(DE).A 



a 


IHD.O 


15 


LO 


(HL).E 


15 


LD 


(HL),H 


15 


LO 


>HL).L 


15 


LO 


(ML).N 


17 


LO 


MX.|ND).A 


16 


LO 


(IX»IN0>,B 


16 


LO 


< IX*I«>>. C 


16 


LO 


(IXMND). D 


lb 


LO 


CIX»INJ»,f 


It 


LO 


C1X*IK». H 


It, 


LO 


(1X.INDM 


16 


LD 


(IX.IND).N 


17 


10 


(IV.IND). A 


16 


LO 


(IV.IND). B 


16 


lO 


( IV.IND), C 


16 


LO 


(IV.IND).D 


16 


lO 


(IV.IND), E 


16 


LP 


( IV.IND). H 


16 


LO 


( IV.IND). L 


16 


LO 


(IV«IND),N 


18 


LO 


<NN>,A 


21 


LO 


(NN>.BC 


28 


lO 


(HH).DE 


28 


LO 


CNN). HI 


27, 


LO 


(NN). IX 


28 


LO 


(NN). IV 


29 


LO 


(MN).SP 


28 


LO 


fl. (BC) 


18 


LO 


A.(0E> 


19 


LO 


A.HL 


14 


LO 


H, I IX- IND > 


14 


LO 


H. (IV.IND) 


15 


LO 


a. (NN> 


19 


LO 


ft,S 


13 


LO 


R.B 


13 


LO 


« c 


13 


1.0 


ft.[> 


13 


LO 


ft- F- 


13 


LO 


ft.H 


13 


LO 


ft, 1 


21 


LO 


ft.L 


13 


lO 


ft, N 


13 


LD 


R.R 


22 


LO 


B. (HL) 


14 


LO 


Ft. (]x- 11*) 


14 


1.0 


8. (IV.IND) 


15 


LO 


B.fl 


13 


LO 


B.B 


13 


LO 


B.C 


13 


LO 


B.O 


13 


LO 


B.E 


13 


LO 


B.H 


17 


LO 


B.L 


13 


LO 


B, N 


13 


LO 


BC.(NN) 


26 


LD 


BC.NN 


24 


LO 


C. <HL> 


14 


LD 


C. (IX.IND) 


14 


LO 


C. (IV.IND) 


15 


LD 


C.A 


13 



FD56*5 
57 
58 
51 

92 

S3 

54 
55 



LO 


C.H 


LO 


C.L 


LO 


C.N 


LD 


0. (HL) 


LO 


D, (IX- ll*i 


LO 


D. (IV.INO) 


LO 


D.fl 


LD 


O.B 


LD 


O.C 


LD 


D.O 


LO 


d.e: 


LO 


D.H 


LD 


O.L 



OBJECT CCOC 


MNEMONICS 


1628 


LO 


O.N 


ED5B8465 


LD 


DE-(NN) 


1184*3 


LD 


DE.NN 


5E 


LO 


E. (Ml) 


0O3E85 


LD 


E. (IX.IND) 


F05E85 


LD 


E. (IV.IND) 


5F 


LO 


E.B 


58 


LO 


E.B 


59 


LD 


E,C 


5ft 


LO 


E,D 


5B 


.0 


E.E 


K 


LO 


E.M 


50 


LO 


E.l 


1E28 


LD 


E.N 


M 


lO 


H. (HI) 


DD6683 


LO 


H,(|x-INO> 


F06663 


LO 


H,( IV.IND) 


67 


LO 


H.R 


68 


LD 


M,B 



64 
65 
2626 

2fl6465 
218465 
ED47 
D02B6465 

00218485 

FD2W465 

F02184B5 

6E 

0O6E85 

FD6E85 



2E26 

E04F 

E07B8485 

F9 

D0F9 

FDF? 

318485 

E0A8 

E0B8 

EDflS 

E086 

E044 

88 

86 

006665 

F08685 



84 
B5 
F628 

Eoee 

E0B3 
ED79 
E041 
E049 
E051 
E059 
E061 
E069 
0328 
EDflB 
EDA3 
Fl 



CI 



OOEl 

F0E1 



0OE5 
F0E5 

CMC 

0OC86586 
FDC88586 
C867 

CB88 

CM 

C862 

1.883 

C864 

,885 

C88E 

0DC8858E 

FDCB8S8E 

C88F 



CB88 

C886 

C88C 

C880 

C896 

D0C80596 

FDCB6S96 

C897 

C898 

C891 

CB92 

CM3 

(694 
C895 
CB9E 

00C8859E 



LO 


H.N 


13 


LO 


HL. (NN) 


25, 


LO 


HL.NN 


24 


LO 


i.n 


22 


LO 


IX, (NN) 


26 


LO 


IX, NN 


24 


LO 


IV, (NN) 


27 


LO 


IV. NN 


25 


LD 


L. <HL) 


14 


LD 


L, (IX.IND) 


14 


LD 


L. (IV.IND) 


15 


lO 


L.H 


13 


LO 


L.B 


u 


LO 


L.C 


13 


LO 


L.O 


13 


lO 


L,E 


13 


lO 


L.H 


13 


LO 


L.L 


13 


LD 


L,N 


13 


LO 


R.fl 


23 


LO 


SP. (NN) 


26 


LD 


SP.HL 


29 


LO 


SP, IX 


38 


LD 


SP, IV 


38 


LO 


SP.NN 


24 


LDO 




39 


LOOP 




48 


LOI 




37 


LOIR 




38 


NEG 




S7 


NOP 




59 


OR 


(HL) 


58 


OR 


(IX.IND) 


58 


Oft 


(IV.IND) 


58 


OR 


ft 


58 


Oft 


8 


98 


OR 


C 


n 



OTOR 




071R 




OUT 


(O.fl 


OUT 


(O.B 


OUT 


(C),C 


OUT 


(O.D 


OUT 


<O.E 


OUT 


(O.H 


OUT 


(O.l 


OUT 


(N), ft 


OUTD 




OUT I 




POP 


HF 


POP 


K 


POP 


OF 


POP 


HL 


POP 


IX 


POP 


IV 


PUSM 


HF 


PUSH 


BC 


PUSH 


OE 


PUSH 


ML 


PUSH 


IX 


PUSH 


IV 


RES 


t.<HL> 


RES 


8. 'IX.IND) 


RES 


e,dv»iNo> 


RES 


e.B 


RES 


8.8 


RES 


e.c 


RES 


8,0 


RES 


e.E 


RES 


B.H 


RES 


8. L 


RES 


1. (HL ■ 


RES 


1. (IX.IND) 


RES 


1. (1V»IND> 


RES 


l.ft 


RES 


l.B 


RES 


l.C 


RES 


1.0 


RES 


1-E 


RES 


l.H 


RES 


l.L 


RES 


2. (HL) 


RES 


2, ■ IX- IND) 


RES 


2, (IV«IND> 


RES 


2,fl 


RES 


28 


RES 


2>C 


RES 


2,0 


RES 


2. E 


RES 


2. H 


RES 


2, L 


RES 


3. (NL> 


RES 


3 (IX.IND) 



183 
183 
183 
183 
183 
183 
186 
194 
32 



FDC8859C 

C89F 

1898 

CB99 

CB9H 

C898 

C89C 

CB90 

CBA6 

00C885fl6 

F0CB85ft6 

C8fl7 

166* 

CBftl 

CM2 

CM 

C6ft4 

C8fl5 

C8AE 

D0C88Sfl£ 

FDC885HE 

C8AF 

CBftt 

can 

CBHft 
C8I* 
LBHC 
LBHO 
CBB6 
D0CB65B6 

FocessBb 

CEC7 
CB68 

CF*1 
CBB2 

C8P3 
C8B4 

CMS 
CBBE 

00CB85BE 
F0C885eE 
C8BF 

CE£S 
C889 

CBBfl 
CF*8 



E8 

E8 

L8 

ECHO 

E04455 

C816 

D0C88516 

FDC86316 

C817 

C816 

C811 

CB12 

CBli 

CB14 

CB15 

17 

CB66 

00088586 

FKB6586 

C867 

C868 

CB81 

CB82' 

C883 

C884 

CB85 

87 

E06F 

CB1E 

D0CB851E 

FDC8651E 

C81F 

C.B16 

C819 

CBlfi 

ceie 

CB1C 

C810 

IF 

C86E 

D0CB6S6E 

FDC8658E 

C86F 

csee 

C889 
C88fl 

csee 

C88C 
C860 



OF 

E7 

EF 

F7 

FF 

CF 

9E 

009E85 

FWE63 

SF 

98 

99 

9fl 

98 



RES 3, (IV.IND) 



RES 


3.C 


RES 


3.D 


RES 


3, E 


RES 


3,H 


RES 


3.L 


RES 


4. (HL) 


RES 


4, IX-1N0, 


RES 


4, (IV-IND) 


RES 


4,8 


RES 


4,1 


RES 


4.C 


RES 


4.0 


RES 


4,1 


RES 


4.H 


RES 


4,1 


RES 


5, (HL» 


RES 


5, <IX* IND) 


RES 


5, (1V«IW» 


RES 


5,« 


RES 


5-8 


RES 


5.C 


FES 


5,0 


RES 


5.E 


RES 


5.H 


RES 


5,L 


RES 


6, (HL) 


RES 


6, (IX«IMD) 


RES 


6. (IV-IND) 


RES 


6, ft 


RES 


6. 6 


RES 


6, C 


PES 


6.0 


RES 


6.E 


RES 


6.H 


RES 


6.L 


RES 


7, (HL) 


RES 


7, (1X«IND> 


RES 


7, (IV«INO) 


RES 


7. ft 


RES 


7.B 


RES 


7.C 


RES 


7.0 


RES 


7,E 


RES 


7,H 


RES 


7.L 


RET 




RFT 


C 


RET 


H 


RET 


NC 


RET 


NZ 


RET 


P 


RET 


PE 


RET 


PO 


RET 


2 


RETI 




RETN 




RL 


(HL) 


RL 


<1X»IMD) 


RL 


(IV-IND) 



RL 


H 


73 


RL 


L 


73 


Rift 




69 


RLC 


(HL) 


71 


RLC 


(IX»IND) 


72 


RLC 


(IV»IND> 


72 


RLC 


fl 


71 


RLC 


8 


71 


RLC 


C 


71 


RLC 





71 


RLC 


E 


71 


RLC 


H 


71 


RLC 


L 


71 


RLCft 




69 


RLO 




79 


RR 


(HL) 


75 


RR 


(IX-IND) 


75 


RR 


■■1V-1ND) 


75 



RRC 



(HL) 

(IX+IND) 
(IV-IND) 



RRC 


E 


74 


RRC 


H 


74 


RRC 


L 


74 


RRCft 




78 


RRO 




88 


RST 


8 


97 


RST 


IBM 


97 


RST 


IBM 


97 


RST 


29H 


97 


RST 


28H 


97 


RST 


38H 


97 


RST 


38H 


97 


RST 


8 


97 


SBC 


R. (HL) 


48 


SBC 


ft. (IXtINO) 


48 


sec 


ft, (1V»IN0) 


48 


sec 


an 


4B 


SBC 


B.B 


48 


SBC 


fl.C 


48 


SBC 


ft, 


48 



90 

DE28 

E042 

E052 

ED62 

ED72 

37 

CBC6 

DDC865C6 

FDcee5C6 

C8C7 

C8C8 

C8C1 

CBC2 

C8C3 

CBC4 

C8C5 

C8CE 

0OC86SCE 

FDC865CE 

C8CF 

C8C8 

CBC9 

C8Cft 

C8CB 

C8CC 

CBCO 

C8D6 

00C885O6 

F0C885D6 

C8D7 

CBoe 

C601 

C8P2 

C803 

CB04 

CB05 

CB08 

CBOE 

D0C8850E 

FDC865DE 

ceof 

CB09 

CBOfl 

C806 

CBDC 

CBOO 

CBE6 

D0CB65E6 

F0C865C6 

C8E7 

C8E8 

C8E1 

C8E2 

C8E3 

C8E4 

C8E5 

CSEE 

D0C865EE 

FDC895EE 

C8EF 

CBE8 

C8E9 

CBEft 

CBEB 

CBEC 

(BED 

CBF6 

D0CBe5F6 

FDC865F6 

C8F7 

C8F8 

CBF1 

CBF2 

can 

CBF4 

CBF5 

C8FE 

D0CB65FE 

FDC885FE 

C8FF 

CBF8 

CBF9 

CBFH 

C8FB 

CBFC 

CBFO 

CB26 

00CB6526 

FDC8B526 

C827 

C828 

CB21 

C822 

C823 

C824 

C825 

C82E 

D0C8852E 

FDCBB52E 

CB2F 

C828 

CB29 

C82fl 

CB28 

C82C 

CB20 

C8K 

000885 3£ 

FDC8853E 

C83F 

C838 

C839 

CB38 

CB38 

C83C 

C830 

96 

0D9665 

F09685 



R.L 

fl, N 

ML.BC 

HL.DE 

HL.HL 

HL.SP 

8. (HL) 

8, (IX-IND) 

8. (IV-IND) 

e,fl 



SET 


8.L 


SET 


1. (HI) 


SET 


1, (IX* IND) 


SET 


l.nV«IND> 


SET 


l.fl 


SET 


1,B 


SET 


l.C 


SET 


l.D 


SET 


IE 


SET 


l.H 


SET 


l.L 


SET 


2, (HL 


SET 


2. (IX* IND) 


SET 


2, (1V*IND) 


SET 


2,fl 



3, (W.) 

3. (IX* NO) 

3. (1V*IN0) 

3.fl 

3.C 

3-D 

3. E 
3,H 
3,L 

4. (HL) 

4, (IX*IND> 
4. (IV*IND) 
4, A 
4.8 



5, (HL) 
5, (IX*IND) 
5, (IV*IND) 
5, A 

5,8 



5.0 



SLft 


(HL) 


SLA 


(IX»IND> 


SLft 


(1V*IND) 


SLR 


fl 


SLA 


B 


SLA 


C 


SLft 





Sift 


E 


SLft 


H 


SIR 


L 


SftA 


(HL) 


SRft 


(IX*INO> 


SRA 


(IV.IND) 


SRft 


A 


SRft 


B 


Sftfi 


C 


SRfl 





SRfl 


£ 


SRA 


H 


SRfl 


L 


SRI 


(HL) 


SRL 


(IX'IND) 


SRL 


(IV*IND) 



6. (IX*IND) 


84 


6. "IV.IND) 


64 


6. A 


83 


6.8 


83 


6.C 


S3 


6.0 


83 


6,E 


83 


6.H 


83 


6.L 


83 


7.<HL> 


83 


7, (|X«IND> 


84 


7. (IV*IND) 


64 



(IX.IND) 
(IV.IND) 
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PROFIT WITH MICRO COMPUTERS 

Shouldn't investing in a Micro Computer 
yield a profit? CLUB SOFT Investment 
Analysis programs pay off immediately 
with time, simplicity, and utility gains. 
Developed by programing specialist 
for Professionals: 

REAL ESTATE EVALUATION 
BOND COMPARISON 
LIQUID MONEY MARKET FUNDS 
LOAN COMPARITOR/SCHEDULOR 
STOCK PORTFOLIO MANAGER 

Price $39.95 each 

All FIVE and an Inflation Analysis 

Program for 



$199.95 

Available for al 
and up. 

CONTACT. 



TRS 80 level II systems 



ClubSolt 



P.O. Box 2355 
Fitchburg, Ma. 01420 
Phone (617) 342-5300 
A Division of FERMAC 



• 281 



AUTOMATICALLY SORT your records «s 
you enter them. 

Machine Language ISAM accessible with 
Basic Language. 

TRS-80* Model I (32K + 48K) 

Model II (64K) 
Average RECORD RETRIEVAL TIME 
I / 1 Oth of a second using a 4,000 
record file 

Also allows you to add/delete records 
Allows you to work with 4 data files 
simultaneously. 
Price: 

MODEL I $160.00 

MODEL II $ I 70.00 

DOCUMENTATION ONLY $25.00 



INC ■% 



RELIABLE COMPUTER 

RESOURCES 

415 MILLBURY STREET 

WORCESTER, MA 01607 

(617) 755-8084 



'TRS-80 and TRSDOS are trademarks of Tandy 
Corporation which has no relation to RCR, INC. 



REAL ESTATE 




EVALUATION 



Experts Agree MAL [STATE INVESTMENTS «re shelter 
Against Inflation today. But with Increasing interest rates. 
profitable Investing takes accurate information. CLUI 
SOIT'S REAL ESTATE ANALYSE! allows accurate easy 
comparison of over THIRTY properties SIMULTANEOUS- 
LY. With simple controls the program can evaluate- 

• CAPITAL GAIN 



• FAIR MARKET VALUC 

• CLOSING COSTS 

• SECONDARY MORT. 

• UTILITY COST 

• RENT LEVELS 



• MONTHLY RETURN 

• TAXES 

• MORTAGE PAYMENTS 

• REPAIR COSTS 

OVER 40 OTHER VARIABLES 



Oaphic protection changes in any quantity. 

Useful to Buyers. Sellers. Brokers, and Investors 

PRICE $39.95 

Available for TRS-80 I6K Level and up 

Contact: 



(MSBft 

P.O. Box 2355 
Fitchburg, Ma. 
A Division of FERMAC 
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554" Diskettes 


10 


50 


100 


3M-744-0 


3.15 


235 


2.85 


Verbatim 525-01 


2.65 


2.45 


2.30 


8" Diskettes 








3M-740 


3.05 


2.85 


2.75 


8" Double Density 








3M-741 


4.15 


3.95 


3.80 



Diskette Storage Pages 10/3.95 
Plastic Library Cases 5"- 1.95 8" -2.85 

CASSETTE TAPES- Agfa PE 611 

Premium quality in superior 5 screw housing. 

C-10 10/5.65 50/25.00 100/48.00 
C-20 10/6.90 50/30.00 100/57.00 

TRS-80 Adventures by Scott Adams 
Machine Language Classics for 16K. 
Seven Adventures currently available. 
SALE! $12.90 each, 3 for $35.00. 

NEW SARGON II Chess (TRS-80 cassette) 
regular price $29.95 — our price $24.90 

Add $1 per order tor shipping. We pay 
balance (UPS surface) on all prepaid orders. 
"TRS-ao le a registered trademark of TANDY CORP.' 
A B COMPUTERS 
115 E. STUMP RD. 
MONTGOMERYVILLE. PA. 18936 
(215)699-5826 ^ B1 

WRITE FOR COMPLETE CATALOG 




SEMISOFT 



THE BLINKING CURSOR 

MACHINE LANGUAGE ROUTINE 

FOR TRS-80 1BK LEVEL II 
LOADS IN SECONDS FROM CASSETTE 
INTO LESS THAN 1/SK BYTES OF PROTECTE D 
MEMORY ANOTIES INTO ROM KEY SCANo 

Customize Your Cursors 

select any character or graphics block 

and watch it blink! 

change as often as you like. 

features : 
■ fast repeating <- kev and space bar 
• instant swap with resident cursor 
o unaffected bynew or reset 
e works in command- eoit- execute mooes 

o KEY DEBOUNCE 



Jf System & a* sett* from Semi soft 



*^2«0 



< 



KGS80 



> 




KOGYOSHfl 



A TRS-80 WORD PROCESSING 
SYSTEM FOR LESS THAN $600 

(If vou own IBM Selectric or equivalent ) 

Turn your typewriter and TRS-80 into 
a new word processing system with a 
new device, the "KGS-80". 

• Plug in compatible with TRS-80. 

• No mechanical modification to the type- 
writer 

• Can be installed in 5 seconds 

• Software, a versatile Simple Letterwriter, in- 
cluded 



179 Riveredge Rd. Tenafly NJ 07670 

DEALER INQUIRIES INVITED 



(201) 569-8769 ^i« 



*• R»»dtr Service — see page 162 



80 Microcomputing, June 1980 • 127 



ir 5 



3194*5 



J3 

34 

35 

34V8 

jr 
am 

» 



u 

« 

64 
65 

M 

n 

69 



(HL) 
<1X*IND) 



sue 

SUB 
SUB 
SUB 

sue 
sue 

XOR 
XOR 
XOR 

xor n 

xor e 

XOR C 
XOR D 
XOR E 
XOR H 
XOR L 
XOR N 

NOP 

LD BONN 

LD (8C),fl 

INC 8C 

INC B 

tCC B 

LD B.N 

RLCFl 

EX AF.AF' 

noo HL.ec 

L0 A. (BC> 

DEC BC 

INC C 

DEC C 

U> C.N 

RRCA 

OJNZDIS 

LD DE.NN 

LD <DE), fl 

INC DE 

INC D 

DEC D 

LD D.N 

RLH 

JR DJS 

ADC HL.DE 

LD A. (DE) 

DEC DE 

INC E 

DEC E 

LD E.N 

RRB 

JR NZ,DIS 

LD HL.NN 

LD <NN>ML 

INC HL 

INC H 

DEC H 

LD H.N 

Dflft 

JR Z.DIS 

ADD HL.HL 

LD HL, <NN) 

DEC HL 

INC L 

DEC L 

LD L, N 

CPL 

jr nc. MS 

LD SP. NN 
ID 'WO. A 
INC SP 

INC 'HL) 
DEC 'HL< 



C.01S 

Hl.SP 
fl, <NN) 



B.E 
B.H 



LD 


C 


LD 


CD 


LD 


C,E 


LD 


C.H 


LD 


CI 


LD 


C . <HL . 


LD 


C-A 


LD 


D.B 


LD 


D.C 


LD 


D-D 


LD 


D.E 


LD 


D.H 


LD 


D.L 


LD 


D.<HL> 


LD 


D.fl 


LD 


E.B 


LD 


E.C 


LD 


E,D 


LD 


E.E 


LD 


E.H 


LD 


E,L 


LD 


E. <HL> 


LD 


E, ft 


LO 


H, B 


LD 


H, C 


LD 


H. D 


LD 


N, E 


LD 


H, H 


LD 


H.L 


LD 


H. (HL i 


LD 


H.fl 


LD 


L.B 



C2846S 
C38485 
C48495 



L.D 

L.E 

L.H 

L.L 

L, (HL> 

L,fl 

(HL).B 



(HL).E 
(HL).K 

«HL>.L 



(HL).A 

ft, 6 
ft.C 
ft.D 
A.E 
ft, H 
ft, L 
ft HL 
ft, ft 

R, B 
ftC 



A, <HL> 

ft, fl 
fl, B 
ft.C 
fl. D 
ft E 
ft H 
ft. 

a, (HL) 
an 



LD 
LD 
LD 

NaT 

LD 
LD 
LD 
LD 
LD 



ROD 
ROD 
ROD 
ROD 
ftDD 
RDC 
ROD 
RDD 
RDC 
RDC 
RDC 
RDC 
RDC 
RDC 
RDC 
RDC 
SUB 

SUB 
SUB 
SUB 
SUB 

sue 
sue 

SUB 
SBC 
SBC 
SBC 
SBC 
SBC 
SBC 
SBC 
SBC 
RND 
ftND 



RND 
AND 

m 

KOR 

xor 
MOD 
KOR 

MR 

XOR 
XOR 
XOR 
OR 
OR 
OR 
OR 



RET 
PCP 



CALL HZ, NN 
PUSH EC 
ROD ft.N 



fl 

ft.B 

ft.C 

ft.D 

ft. E 

fl, M 

A,L 

n, (M.) 

A, A 



cede 


RLC 


csei 


RLC 


cm 


RLC 


CB83 


RLC 


CB84 


RLC 


C6B5 


RLC 


LB66 


RLC 


CBO? 


RLC 


CBB8 


RRC 


cm 


RRC 


CB6R 


RRC 


CBflB 


RRC 


CBBC 


RRC 


C880 


RRC 


CBBE 


RRC 


CB9F 


RRC 


CB1B 


RL 


CB11 


K. 


C812 


RL 


CB13 


RL 


CB14 


RL 


C815 


RL 


CS1C 


RL 


C817 


RL 



OBJECT CODE 


rtNEMONKS 


CB18 


RR 


B 


0619 


RR 


C 


C81A 


RR 


D 


CB18 


RR 


E 


C81C 


RR 


H 


C81D 


RR 


L 


CB1E 


RR 


(WL> 


C81F 


RR 


A 


CB28 


SLfl 


B 


C62i 


SLft 


C 


cm 


SLft 


D 


C823 


SLft 


E 


CB24 


SLR 


M 


CB25 


SLft 


L 


CB26 


SLft 


(hl; 


CB27 


SLft 


A 


CB28 


SRfi 


B 


CB29 


SRfl 


C 


CB2fl 


SRfl 


D 


CB28 


SRP 


E 


CB2C 


SRfl 


H 


C82D 


SRfi 


L 


CBS 


SRR 


i ml; 


CB2f 


SRfi 


A 


C638 


SPA 


B 


C839 


SRL 


C 


CB3FI 


SRL 


D 


CB3B 


SRL 


E 


CMC 


SPA 


H 


C63D 


SRL 


L 


C63E 


SRL 


(HL; 


CKJF 


SRL 


A 


CM 


BIT 


e.B 


CBM 


BIT 


e,c 


cet? 


BIT 


ft.fi 


QM3 


BIT 


B.E 


C644 


BIT 


e. H 


CB45 


BIT 


». L 


CB46 


BIT 


«. 


CB47 


en 


6. ft 


CB48 


BIT 


1.1 


CB49 


BIT 


l.C 


OBM 


BIT 


l.D 


CMS 


BIT 


IE 


C94C 


BIT 


l.H 


C84D 


BIT 


LL 


C84E 


BIT 


1.(1 


C84F 


BIT 


l.H 



CB58 
CEftl 
0652 

cesi 

(654 
CB55 
CB56 
CB57 

net 
can 

CR3A 

CB5B 

cue 

cm 
cm 

CBJF 

cm 

csti 

CMS 

Cfc*i 

cm 

CMS 

C866 
CB6? 
CB68 
C969 
CS&fl 
CB68 
CB6C 
C86D 



csre 

C371 

an 
an 

CB74 
C675 
CB76 
CB77 
C878 
C879 
CB7H 
C87B 
C87C 
C87D 
CB7E 
C87F 

cm 

C-881 
0382 
CBS? 
C664 

CB8S 



CBBfl 
CB8B 
CBBC 
CB8D 
CB8E 
C68F 
C690 
CB91 
CB92 
CB93 
CB94 
CB9J 
CB96 
CBS? 
CB98 
CB99 



BIT 


2, 'HL> 


BIT 


2, A 


BIT 


3, B 


BIT 


3.C 


BIT 


3-D 


BIT 


3.E 


BIT 


3.H 


BIT 


3,L 


BIT 


3, (HL) 


BIT 


3,fl 


BIT 


4.8 


BIT 


4.C 


BIT 


4.D 


BIT 


4.E 


BIT 


4.H 


BIT 


4.L 


BIT 


4. (HL> 


BIT 


4. A 


BIT 


5, B 


BIT 


5, C 


BIT 


5,D 


BIT 


5.E 


BIT 


5.H 


BIT 


5.L 


BIT 


5. IHL) 


81 T 


S.A 


BIT 


6. B 


BIT 


cc 


BIT 


6, D 


BIT 


6, E 


BIT 


6. H 


BIT 


&L 


BIT 


6. (HL) 


BIT 


&A 


BIT 


7. 3 


BIT 


?,c 


BIT 


7, D 


SIT 


7, E 


BIT 


7.H 


BIT 


?. L 


BIT 


?.\HL> 


BIT 


7.fl 


RES 


I. a 


RES 


9. C 


RES 


B.D 


RES 


B.E 


RES 


e.H 


RES 


8,1. 


RES 


e. (HL) 


RES 


e. r 


RES 


1.6 


RES 


H 


RES 


l.D 


RES 


l.E 


RES 


l.H 


RES 


l.L 


RES 


1, 'HL' 


RES 


1. A 


RES 


2.8 


RES 


2,C 


RES 


2,D 


RES 


It 


RES 


2, n 


RES 


2.L 


RES 


2, <HL' 


RES 


2.A 


RES 


3.B 


RES 


3.C 



0BJEC1 C«'F 


ItCHOHICS 


C69H 


RES 


3-D 


(B98 


RES 


3.E 


i69C 


RES 


:h 


CB9D 


RES 


SL 


CB9E 


RES 


3. (HL- 


C89F 


RES 


3. ft 


CBkO 


RES 


t.B 


CB81 


RES 


4.C 


CBR2 


REi 


4,0 


uM 


RES 


4.E 


cm 


RES 


4. H 


CMS 


RES 


41 


cm 


RES 


4. 'HL' 


C8R? 


RES 


4.H 


CBA6 


RES 


S.R 


C8RS 


RES 


Si 


lBwh 


RES 


5,0 


CBAB 


RES 


S-E 


CBmC 


RES 


5-H 


CORD 


RES 


5.L 


cm 


RES 


5- 'HL» 


CBRF 


RES 


5, ft 


C.BB8 


RES 


B.e 


CBB1 


RES 


s>c 


i:B82 


RES 


6.0 


cee: 


RES 


S f 


CSS4 


AES 


6 M 


CBVf, 


RES 


61 


K 68c- 


RES 


... .HI 1 


(887 


RES 


t..H 


1888 


RES 


r.e 


CB8? 


PES 


7. C 


CB8R 


RES 


7.D 


C8BB 


RES 


r.E 


OK 


PES 


i'.H 


CB8D 


RES 


7. L 


lBBE 


RES 


7. • HL ■ 


C BE» 


PEs 


r.R 


cetft 


SET 


R.S 


(6(1 


SET 


8- 1 


tec; 


SET 


»■[■ 


cec; 


SET 


W.I 


CSC4 


SET 


8. H 


CKS 


SET 


8.1 


cm 


SET 


6. 'HL- 


CBC? 


SET 


0- M 


cm 


SET 


1, B 


CBC 5 


SET 


1C 


CBCfl 


SET 


1,0 


CBCB 


SET 


l.E 


C8CC 


SET 


l.H 


CBCD 


SET 


l.L 


cm 


SE1 


MM.) 


CBCf 


SET 


l.H 


CBDO 


SET 


2. B 


cm 


SET 




IBDi 


SET 


2,0 


cm 


SET 


M 


C804 


SET 


£ H 


ceo 1 . 


SET 


2, L 


C806 


SET 


2, (HLi 


CBD7 


SET 


2, A 


cm 


SET 


3,B 


C.BD9 


SET 


3.C 


cm 


'SET 


3-D 


CBl* 


SET 


3. E 


CBK 


SET 


i-H 


cm 


^ET 


?.l 


CBK 


SET 


3«HL 


LBW 


SET 


3. A 


CBES 


SET 


*.g 


CBE1 


SET 


4, C 


cess 


SET 


4, D 


CBE3 


SET 


4. E 


CBE4 


SET 


4.H 


CBE5 


SET 


4, L 


CBE8 


SET 


4. (HL 


CBE7 


SET 


4. R 


cm 


SET 


S.R 


cm 


SET 


5. C 


C8EA 


SET 


5,0 


cm 


SET 


S.£ 


CBEC 


SET 


S.H 


CECO 


SEI 


5.L 


C6EE 


SET 


5, '.HL 


CBEF 


SET 


J, A 


C8F8 


SET 


6, B 


C8F1 


SET 


6.C 


CBF2 


SET 


6. D 


C8F: 


SET 


6. E 


C8F4 


SET 


6. H 


CBF5 


SET 


6.L 


C8FS 


SET 


6. (HI • 


car? 


SET 


6.R 


CBFS 


SET 


7.B 


C8F9 


SET 


t.t 


CBFfl 


SET 


?,D 


CEF6 


SET 


7,E 


CBK 


SET 


7.H 


CBFD 


SET 


7.L 


CBFE 


SET 


7, (HL> 


C8FF 


SET 


7, A 


CC84OT 


CRUZ.NN 


CD8485 


CALLHN 


CE28 


ADC 


ft. N 


CF 


RST 




OB 


RET 


HC 


Dl 


POP 


DE 


[>2840S 


JP 


NC-NN 


D328 


OUT 


<H>. Fl 


D484C5 


CALLNC, NN 


D5 


PUSH* 


0628 


sue 


H 


D7 


RST 


18H 


06 


RfT 


C 


09 


EXX 




DA84e5 


JP 


cm 


DB29 


IN 


H. 'N' 


DC64«5 


CALLC.NN 


DM9 


ADD 


ix.ee 


DD19 


AM 


ix. re 


D0:'18485 


LD 


IX.NN 


0D2284B5 


LD 


<HN'. IX 
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object aw 


PKICNICS 


"<j£ t 


OBJECT COM 


ItCMHICS 


PPM i 


OBJECT CODE 


IWnONICS 


PPSE 1 


OBJECT CODE 


tteoMcs p 


AGE • 


DM 


INC 


IX 


•■> 


DCCM5CC 


SET 3.<IX»IW» 


8* 


ED69 


QUI 


(C).L 


183 


F06683 


LD 


H, <[V«INO> 


15 


t*29 


<: 


IX. Ix 


64 


.:■(,■'■:>.■ 


SET 


4. .IX.1ND. 


(■« 


EMI 


•*•- 


MUM. 


t. 


F06E83 


.1 


L. av«iK» 


15 


BMMIW 


.: 


IX, (W> 


M 


cccsesEE 


SET 5. (IX«I»C) 


*» 


EMF 


'.: 




1 


F07883 


.: 


UV»IN0< B 


16 


M>2S 


:< 


IX 


«7 


0&C885F6 


SET 6.<IX»I«» 


-< 


ED72 


m 


HL.SP 


84 


F07183 


:: 


UV«INO).C 


16 


MMU 


:•« 


<ix«in>. 


54 


[«BWE 


SET 


7, <IX«1«>) 


-4 


EP 738485 


LD 


'K if 


26 


F07285 


s. 


UV«IND'.0 


16 


1*3385 


:*■■: 


<ix»iw» 


55 


C*E1 


ft 


IX 


n 


E078 


IN 


8. <C> 


98 


F07385 


LD 


CIV.INPi.E 


16 


w>2«c» 


.[• 


<IX»IW».N 


17 


HG 


EX 


<SP),IX 


36 


EC''? 


cut 


<O.B 


183 


F07485 


LO 


1 IV»INO) N 


16 


[*» 


M* 


IX. SP 


14 


wa 


MJSHIX 


-1 


ED78 


H(^ 


HUM 


63 


F07585 


Lt' 


UV«IND>.L 


16 


1*4*85 


u> 


B, (|X«IW>' 


14 


DM9 


JP 


(IX) 


98 


£0788485 


LD 


SP. <NN) 


26 


FOr/85 


LO 


(IY»IM».B 


16 


C*4E95 


LO 


C(IX»M» 


u 


DOE* 


Lt> 


SP. IX 


it- 


EOM 


LDI 




37 


F07E85 


LD 


f*. i IVMNO) 


15 


(»■•■-«-■ 


LD 


[>. .IX.1W>> 


14 


ueat 


SBC ft. N 


48 


f(»ii 


CPI 




41 


F08683 


DM 


«, (|V«INOl 


4" 


MWS5 


LD 


E.(IX»I»> 


14 


OF 


(KT 


UM 


97 


EMS 


INI 




*• 


F08E83 


RK 


fi. (IV*IM» 


46 


DCtfeS 


LB 


H,(IX«I»> 


14 


ES 


«T PC 


•* 


on 


OUT I 




'.,•4 


F09683 


■:. « 


(IV«IN0> 


47 


:<«*• 


U 


L. <IX«1W» 


14 


El 


POP 


W, 


>. 


EMI 


.:c 




• 


FD9E83 


: t 


8. (IVIND) 


48 


BMWfl 


.: 


dx*iic».e 


!• 


E28483 


■( 


PO.tt< 


M 


EMI 


-H 




42 


F0FI683 


MO 


*IV«IND) 


•J 


t<-7i*T 


LD 


<IX»lNt».C 


16 


E3 


EX 


<SP).HL 


n 


£'•*• 


It 




1M 


F0«e5 


■:* 


<1V«IN0) 


51 


«-*■ 


LD 


:■•:•».: 


16 


£46495 


CHLLPO.W 


ki 


e:*e 


XTE 




186 


F0B685 


* 


HV.INO) 


M 


:< -_v? 


LD 


:■•:•<: 


16 


E5 


puswi 


31 


e:«* 


LOIR 




38 


FDBE85 


Cf 


(iv«iw» 


52 


DC74«5 


-:■ 


:•*:•*■■ 


16 


EM 


M> N 


4- 


e:*.: 


a :« 




4: 


F0CB858t. 


m 


<IV.|NO) 


72 


»73» 


.:■ 


ux*im».l 


16 


E7 


»ST 


.* 


97 


ec«- 


:mf 




:•* 


Foceesec 


«-; 


<IV.1ND) 


74 


t»7?SJ5 


.:• 


<1X«1ND>.« 


1^ 


lb 


<^T 


PE 


H 


ECtO 


y.'.i 




185 


F0C8831E 


K 


(IV.INt" 


n 


I07t« 


LD 


R, <IX«I»> 


14 


E9 


JP 


IML) 


*< 


ECt* 


UM 




4* 


FM8861E 


M 


UVINO) 


75 


HMK 


no h. <ix»im» 


44 


EH8485 


.If 


PE.NN 


:.. 


Et*S 


cm 




4. 


F0Ce8326 


SLA 


(IV*IM» 


76 


[■(■aw 


W>C A.(IX»IM» 


46 


EB 


EX 


DE.HL 


:<4 


EPW 


INt* 




18. 


F0Ce852E 


MR 


(1V»IW» 


77 


K>M«S 


SUB 


UX'IIO 


47 


EC9485 


nu 


PE.NM 


*:• 


EM 


MM 




ior 


F0CB853E 


SA 


(IV.IMO) 


n 


C*K« 


SeC ».<1X»1*» 


•3 


ED48 


IN 


B. (C) 


M 


EE2B 


MR 


N 


51 


FK 68546 


CP 


8- - IV»lNt> » 


82 


DCMM 


AND 


ax.iw» 


4* 


EMI 


OUT 


<C).8 


m 


EF 


(1ST 


MM 


97 


FDC6e34£ 


BH 


1. (IVMND) 


K 


W*E#5 


tat 


<IX»IND> 


31 


ED42 


m 


HL.BC 


C4 


FH 


PET 


P 


95 


F0C88556 


in 


2. (IVtlNO) 


82 


CMOS 


an 


(IX.INDl 


H 


EW 38485 


LD 


(NN>.K 


>l 


Fl 


PC) 


«F 


S 


FKM55E 


BIT 


3..IV.INO) 


?i 


DMCS5 


Ct> 


(IX.INt» 


SB 


ED44 


m 




57 


F28485 


JP 


1 '«. 


H 


FDC88366 


BIT 


4. <IV«INO> 


82 


occseew 


RU 


<IX»1*> 


tz 


E04455 


i*n 




>• 


F3 


Dl 




68 


FDCB856E 


BIT 


5, (lV.IMOi 


82 


[txeesec 


«-; 


<IX.J»> 


•4 


EMC 


a 


8 


■:: 


F48485 


ecu 


P. MM 


•' 


FOCSOS'E 


BIT 


6.0V.IND) 


X 


C*CW3i6 


K 


<IX«I») 


n 


EM? 


j. 


1. 8 


. t 


F5 


=•> 


■♦ 


.1 


FOCWSrE 


BIT 


7. (IV»!NO> 


•M 


xcsesiE 


« 


<IX«I») 


75 


EMI 


IS 


C(C) 


•*• 


F628 


:* 


N 


58 


FDCB83E* 


RES 


8. (IV.IND) 


89 


MXSeSM 


su 


(IX'IND) 


76 


EMS 


Ml 


<C).C 


183 


F7 


i" 


m 


97 


F0CB838E 


RES 


1.<IV.IN0< 


85 


cxxeesx 


3«* 


(IX«IW>> 


77 


ED4« 


■« 


ML.BC 


63 


n 


if 


H 


95 


F0C8B39E 


H. 


2. cmum 


85 


;«f«53£ 


n 


:■•:>«■ 


n 


ED48B485 


Li 


BC.<t«> 


M 


F9 


.: 


SP.HL 


29 


F0CB85* 


RES 


3. (IV. IMP i 


•". 


.:■.=*- -« t 


t: - 


Mix* IN) 


K 


BMB 


SET 




i « 


F88485 


■ 


- '*. 


M 


F0CB83P* 


RES 


4. (IVMW.i 


K 


kxbkme 


in 


i. <ix*iw» 


82 


rc^ 


LB 


B.M 


23 


FB 


El 




.- 


FrX885« 


RES 


5, (1V.JW" 


'••■ 


i«eesw 


III 


2. <IX*1K» 


>-. 


E09I 


li. 


b. (C) 


N 


FC8485 


CNJ 


n. hx 


• 


F0CB85BE. 


» 


6. 'IV»IN0' 


85 


(KtMi 


Ml 


3. (|X*IN» 


82 


i DW 


DM 


<C).D 


1H; 


FD89 


MP 


IV. BC 


65 


FI.C685K 


RES 


7. (IV+INDJ 


85 


W<£*5« 


HIT 


4. IIX»IND) 


82 


Et/52 


54X 


HL.DE 


64 


FMI 


mo 


IV. OE 


65 


FDCM5M 


SET 


e.(iv»iNt.i 


84 


K<B*56E 


HIT 


5, <IX»1ND> 


82 


ED53848S 


LO 


'NN>.D£ 


2fi 


F 0218485 


LD 


IV. UN 


21 


FweescE 


SET 


1. (1V4IND) 


M 


txXBe5?6 


111 


6. (IXMNDl 


»2 


EOT6 


in 


1 


61 


F0228485 


LD 


•NN-. IV 


2<i 


FC<685(* 


SET 


2, <IV»IMO> 


84 


tweesTE 


BIT 


7. (IX*IN>> 


82 


EW.' 


LD 


ft>l 


21 


FD23 


INC 


IV 


66 


Ft>CBe50E 


-f 


3. (IV«IW>) 


M 


LU6»ee 


'1: 


8. (IX*IM>> 


85 


ED58 


:n 


E, <C) 


98 


FD29 


<■: 


IV. IV 


••* 


FTXM5EC 


SET 


4, (IV«INP' 


A4 


doc msec 


RES 


1. (1X*IND> 


85 


EB99 


OM 


<O.E 


183 


FD2«485 


IB 


IV. (HN) 


;r 


Ft'ceesEE 


SE1 


5. (IV.INO) 


M 


c*cee5% 


as 2.ax«i*» 


85 


EDSft 


UK 


*.D£ 


13 


FD2B 


DEC 


IV 


•: 


F0CB85F6 


SET 


6. (IV«INt.. 


4 


l*C»5?€ 


ME 


i. (IX*IN» 


'■* 


ED5W485 


LI 


•■•'«. 


.• 


F03485 


:•.. 


ilVMNDi 


54 


F0C88r4"E 


SET 


7. (IV.INO) 


:4 


[*C«eSM 


KS ' :■■:•> 


85 


ED5E 


Dl 


2 


ES 


F03585 


DEC 


«IV«IM>' 


55 


FDEl 


POP 


IV 


.: 


cwspsf* 


«S 5. (!X.INt» 


H 


EMF 


LI 


A.R 


.. 


F0368528 


.. 


<IV»INO>N 


:. 


FM 


EX 


(SP).lv 


:- 


:«e*5« 


SES 6. <IX.lNt» 


■' 


EMI 


IN 


H.<C) 


N 


F039 


•<: 


IV. SP 


■ ■ 


FOE! 


PU - 


IV 


32 


:<•:&«« 


as 


r.<!X*M» 


:• 


Eit: 


DM 


(C).H 


;«• 


F04685 


LD 


6. <IV»1N0» 


13 


FMI 


JP 


CIV) 


98 


!«B«Ct 


SET «.(IX.I»> 


4 


EMS 


M 


NUM. 


64 


F04E85 


.: 


CCIV*M» 


1" 


FDF9 


.1 


SP. IV 


:«• 


:«b»u 


SET 


l.(IX*IND> 


M 


I!*' 


wi 




... 


FD5685 


.:• 


0. UV.IMO) 


15 


FE2S 


CP 


M 


'. 


[«C£«QM 


SET 


2. <ix*in» 


1-4 


(I** 


IN 


L.<C) 


98 


F05E85 


LD 


E. (IV.INb, 


15 


FF 


F$- 


HH 


97 



TRS- 



Software 
Exchange 



• Cash & royalties for original 
programs — science, busi- 
ness, games, education. 

• No risk. 

• Join our co-op & share your 
programs with others and 
vice-versa! 

Programs must be original! 

For complete info, clip & mail to: 

Software Exchange 

P.O. Box 42407 ^ 

Portland, Oregon 97242 





QUALITY TRS-80 SOFTWARE 



KEYWORD Indexing System 

\ Kdn ni proframs ihm will creak a dala ilk- >m JKc, build an 
liuk't <i( all lajXWIHMn "i "Kc>wkiK" In iht kxl iii the data (Ik 
and allim lm|alrk« m -iar<Wc<. inin lh« (Ik inlng ihv Imkxcd 

•fkxlhk Kum) kiNJlh* aMi I.Kjili.n a4ilnkr« 

• ikkidKi i»i mm Lw>»iifiK in mi lnd« h» >i«kki 
•"and" "m" "mm" hMjk fur Imfulrk^ 
•inkiii»» iiK mcr Hritkn lm|«lrlo 

kl>»irtll>IM)l\ idu. laiOaSaaalaa SI9.M 

SORTS for HOME and BUSINESS 

Vi ciimpiikr «xr »huuld Ik hHImhiI a ix-rxaUk^a*) lo »« mmI 
priMjram. I he >nrilitii»i Hknman: In iiK-nicm mmI pn>grain« arc 
nrllkn In U»cl II BxSK and na>c Ihc iull'mlnn (calurcx 
•Sntl xl.l'll \ or M Vll.kK data 

•SlMI nil up Nl S ikllk NllllullillKMMsk 

•In amending m defending «qiKncc 

• .Supix.n. Ui. tldcu iir lapc I 

•Sunni.ri.. R»> dKk and prlnkr I (> (MIRT 111)1 
•SupfUKi. Mxer I O murine* 

•Uatr exfts (SORT III) ..nM 

SORTII-ibKLoellllnmcmiirxMin SI9.9S 

SORT III) 12MMIS In mem.K> mki S29.9S 

FOR Hm SERKHIS CAMRLER 
tttOxMCK M hi UTML Mk*n ..* m -ii.il.Iku hk pia>Ni« ••( 

HJHMMinds ill hands im H.I and unali re ihc rc»uli« mi lapc In U-> I 
IIHVSIC. SI 9.95 

HanuaK ior all pni|ranii> aiallahle fitr $5,110 ca. 

(price dedwcllhk ihi purchaw in pni|rani> 

"TRS-80 is a registered trademark ol TANDY CORP " 

( c l>^heast<^VIICROWARl) 
BOX 2133, ^ 
BOSTON, MA. 02106 



TRS-80 MODEL II 

ProinsMMul Sotturan NOW a^ AILABU ' 
WORD PROCESSING: I omplele editing i<ip.ibilil> HI 
< luduif center, nght lell or lull line iM-tiiu .itii.iv l.ibs. 
m.iruin Irrnjth & width ( ontrol Lini-s dutomdtudlly 
oM-rllcm Irom line to line All tile vpetilic .it.ons stored 
on disk I'.isswords used All printer teatures used (per 
>our printer) Auto insertion ot names date ei< from 
other d.ii.i lilelsl Disk index maintained tor tile ton 

irol Vou ( ,in display index dale time created, i hanged 
orused&hrietdesinption System L(Ki used hies tan 
he on other disk drives I xtrai I & build A i ham ol dil 

ferent tiles can !>•• printed along with multi-copy ion 

trol & auto insertion Interlat my vsith other systems lor 
auto data easily done 

Requires 64K & printer ol your ( hone 
Dotumentalion - ilOIKl lotal = SJ14IW 

BASIC CROSS REFERENCE: Prepares a listing ot your 
BASK program Heading contains program name, 
date. time. & page # All RtM statements print 
HONCAUD & are easy to spot The <ross relereme 
report is then printed It shows you at a CLANG what 
line » s within your program are reierem ed & where all 
variable names used & where Know what is available 

Kind 1)1 Ai) spots We wrote Ims for ourselves you 
i an use il loo ' 

Documentation • S10.00 lotal ■ 15999 

DISK SORT: Sorts thousands ol random Me records 
Cdpai it v is dependent on your disk space I ttu lent use 
ot strings Sorts any data area Horn I thru 2SS con- 
tiguous bytes within any part ol your record Specitica 
tions are input using the question & answer method 
I hey i sn Im* stored & used automatically in your sys- 
tem |oh stream or you i an one-shot sort Input tiles arc- 
not ( lobbered by the sort All stored spei s c an be dis 
played printed or ( hanged 

Single or multiple drives (t (,4k required 

Documentation ' 11000 rotal ■ »t> , ) , w 
COMING SOON: General ledger. Aciounts Receiv- 
able Payable Inventory ( ontrol & more 
CUSTOM SYSTEMS: It you have a special need send Us 
a letter We can do it 

ANADIX PRINTERS. DP-9500/9501 $1.65000 NEW! 
Sena tor documentation & order torm. 
GOOD-IYDDON Dala Svxlerm 
M8t> Rner-idc />„ Cnmo. CA 91710 ^21B 
*/Ji-i/u< I. Me on soirware purchases 

iKsav is a registered trj<«-mjrk or randy ( orp 



^Reader Service - see page W2 
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BUSINESS 



Use this program to replace your 

columnar work sheets when doing the books. 

Accountants Aid 



James H. Sheats 
2036 Headland Drive 
East Point, GA 30344 

From time to time accoun- 
tants, bookkeepers, ana- 



lysts and the rest of the num- 
ber-scribbling fraternity (by 
whatever name called) pick up a 
sheet of columnar work paper, 
print a report title and date at 
the top, print columnar head- 



1B REM "SPREAD SHEET" 

20 REM PROGRAMMED BY JAMES H. SHEATS 

30 REM 2036 HEADLAND DRIVE 

40 REM EAST POINT, GEORGIA 30344 

50 REM 404-766-0857 

52 CLEAR2000 

5 3 DEFDBL C,T 

55 CLS:LPRINT CHRS (31 ) : LPRINT: LPRINT 

60 PRINT" SPREAD SHEET PROGRAM" 

65 INPUT'REPORT NAME ";RS: LPRINT TAB( 30) R$:LPRINT:LPRINT 

68 INPUT"DATE"jDS:LPRINT TAB(35 )D$:LPRINT: LPRINT 

70 INPUT* INPUT LINE NAME";L$ 

7 5 INPUT" NUMBER OF COLUMNS WANTED ";N 

76 DIM CS(N) ,C(N) ,CT(N) 

77 LPRINT USING"* »"; LS; 
80 FOR X»l TO N 

90 INPUT'COLUMN NAME*;CS(X) 

100 LPRINT USING"*. %";C$(X); 

120 NEXT 

125 LPRINT'TOTAL" 

130 PRINTLS: INPUT L 

140 IF L-999 THEN 200 

144 LPRINT USING"tlllltltll")L; 

145 T=0 

150 FOR X=l TO N 

155 C(X)=0 

160 PRINT CS(X),: INPUT C (X) :T=T+C (X) 

165 LPRINT USING"lllllll.tl";C(X) ; 

170 CT(X)-CT(X)+C(X) 

160 NEXT X 

185 PRINT "TOTAL";T:LPRINT USING" itl I ill . II" |T 

190 GOTO 130 

200 CLS:LPRINT: PRINT "TOTALS" tLPRINT'TOTAI.S 

204 PRINT CS(X) ,CT(X) , 

205 TT"TT+CT(X) 

208 LPRINT USING"MIIIII.II";CT(X) ; 
210 NEXT X 

220 PRINT "GRAND TOTAL ";TT 
230 LPRINT USING"MiMII.II";TT 
240 END 



"t :FOR X-l TO N 



Program Listing 



ings across the page, and start 
filling in lines and columns of 
figures. 

Usually these sheets have 
both line and column totals, 
which should be equal when 
cross-footed. After consider- 
able work with an adding ma- 
chine and an eraser they usual- 
ly are. Finally. 

The Accountant's Writeup 
Aid is designed to eliminate 
some of the pain associated 
with this process. The program 
can be adapted to a number of 
purposes in its present state 
and can be customized to your 
own needs. 

This program is written for a 
TRS-80, Level II, with a 132 
column line printer (in the 
author's case, an IDS Paper 
Tiger). 4K of memory is plenty, 
since the program is very short, 
about 874 bytes. 

The Program 

The program uses both 
screen and printer output, but 
users without printers can 
eliminate all LPRINT state- 
ments and still have a useful 
program. 

The command on Line 55, 



LPRINT CHRS (31), is a Paper 
Tiger control command that ad- 
justs the line length to 132 
characters. It may not be neces- 
sary with other printers. Lines 
65 and 68 allow you to input a 
Report Name and Date. Both of 
these lines are unnecessary 
without a printer. 

Line 70 is the reference name. 
This can be Date, Check 
Number, Invoice Number or 
other suitable reference. This 
entry is not used for any compu- 
tations. 

In Line 75, input the number of 
columns that you want for a par- 
ticular task. This version of the 
program is written with 10 
characters per column and will 
print the reference column, 11 
data columns and a line total 
column. (See Fig. 1.) You may 
customize your LPRINT USING 
statements for more or fewer 
columns. 

Lines 80-125 form a routine to 
input heading names for the col- 
umns. 

In Lines 130-190, numerical 
data is input. Each entry may be 
positive, negative or zero. After 
accepting an entry for each col- 
umn, the program prints a line 
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total, and the routine is repeated 
for the next line. If an input error 
is made, the same reference 
number can be re-entered, zero 
quantities entered for the un- 
changed columns, and correc- 
tions made in the erroneous col- 
umns. This procedure is demon- 
strated in Fig. 1 for day 4. 

This program loop is exited by 
inputting a reference number of 
999, but you may establish your 
own loop exit. Upon exit from 
the loop, the program prints col- 
umn totals and a grand total. At 
that point, the program ter- 
minates. This routine is in Lines 
200-240. 



One Disadvantage 

One disadvantage to this pro- 
gram is that an entry must be 
made in each column, each 
time. However, a zero or an 
ENTER will do. No heading 
routines for second and subse- 
quent pages are provided, 
either. 

Still, for the computer 
owner/businessman, this sim- 
ple program has a great deal of 
flexibility and should be in his 
library along with the amortiza- 
tion, checkbook balancing, de- 
preciation and all the rest of the 
so-called "business" pro- 
grams.! 
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| STATE COLLEGE. PA. 16801 | 
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MEANS IMAGINATION 



TRS-80 LEVEL II/16K $25.00 

BASEX COMPILER 
AND LOADER 

BY PAUL K. WARME 

A powerful, easy-to-learn 
language that runs up to 
20 times faster than BA- 
SIC. This 8K interactive 
compiler works much like 
BASIC and makes very 
compact programs. Fea- 
tures include arrays, strings, 
16 bit math, block move 
and search, subroutines, 
fast graphics and tape I/O, 
97-page manual, $8 extra. 



MIRRORAYS 16K/LII $7.95 

Flash rays of light into a black box in order to locate hidden 
mirrors, which light up and reflect the rays when hit. 
LUNAR LANDER SIMULATOR 16K/LII $7.95 

This program provides REAL-TIME simulation and control 
of the Lunar Module through continuous keyboard inter 
action. 

COMPACT GRAPHICS INTERPRETER 4K/LII $7.95 
Elaborate graphic designs can be created and constructed 
by this interpreter with a simple set of numbers. 
BATTLEGRID 4K/LII $7.95 

A REAL-TIME game of speed and strategy, enabling two 
players to attack each other's forces. 
Add $.75 postage per order. FREE brochure with full 
description of each program. 



FILE 

MANAGEMENT 

SYSTEM 

Bus/ness/Personaf Use 



•CREATES— describe the length and 
name of each field in a disk file and the 
FMS system allows you to create and 
update the file without any program- 
ming. 

•UPDATES— descriptive prompting 
and length checking for each field are 
automatically performed by the sys- 
tem when adding or updating records. 
•REPORTS— FMS allows variable re- 
port format and headings as specified 
by you; reports go to display and/or 
line printer. 

•SORTS— files can be sorted on any 
field in ascending or descending se- 
quence. 



INCLUDES: programs on diskette, sample files and 
extensive step-by-step documentation. 
REQUIRES: TRS40, disk, 32K. 

order FMS from ftP^V 

"the Business O^^^ 

Software Co." ^g.O* 

609 Sapphire St. 

Redondo Beach, CA 90277 

please *& V.QO for postage & handling. Cattf. 
residents add 6% sales tax. Add 3% for VISA or 
Master Charge. 



Let Your TRS-80® 

Teach You 

ASSEMBLY LANGUAGE 

Tired of buying book after book on assembly 
language programming and still not knowing your 
POP from your PUSH' 

REE Msoft proudly announces a more effi- 
cient way, using your own TRS-80* , to learn the 
fundamentals of assembly language programming 
-at YOUR pace and at YOUR convenience 

Our unique package, INTRODUCTION TO TRS-80* 
ASSEMBLY PROGRAMMING will provide you with 
the following. 

• Ten 45-minute lessons on audio cassettes 

• A driver program to make your TRS-80* video 
monitor serve as a blackboard for the instructor 

• A display program for each lesson to provide 
illustration and reinforcement for what you are 
hearing 

• A textbook on TRS-80* Assembly Language 
Programming 

• Step-by-step dissection of complete and useful 
routines to test memory and to gain direct control 
over the keyboard, video monitor, and printer 

• How to access and use powerful routines in your 
Level II ROM. 

This course was developed and recorded by 
Joseph E. Willis and is based on the successful 
series of courses he has taught at Meta Technologies 
Corporation, the Radio Shack Computer Center, and 
other locations in Northern Ohio. The minimum 
system required is a Level II, 16K RAM 

REMASSEM-1 only $69.95 



^ 



REMsoft, Inc. 

571 E. 185 St. 
Euclid. Ohio 44119 

(216)531-1338 



% 



^70 



Include $1 SO lor shipping and handling 
Ohio residents add 5 '/»*/. sales tax 

TRS-80* is a trademark ol the Tandy Corp 



!!NOW AVAILABLE!! 

Index 

Sequential 
Access 
Method 



* Get and Put Records to Disk File by "KEY 

* Read File in Key Sequence Without Sorting 

* Delete Records Without Recopying File 

* Add Records to Disk Files in Any Sequence 

* Variable Key Length From 1 to 50 Characters 

BUSINESS APPLICATION ADVANTAGES 

- Improved Disk Utilization 
Easier Program Development 

- Improved Operating Characteristics 

- Reduce or Eliminate Sorting 

- Improved Performance 



ISAM SUBROUTINES 
ISAM UTILITIES 



Documentation 

On Diskette $50.00 



PLUS • Free Mailing List Sample Application 
Add 6* 1 * Sales Tax for California Orders 

^85 

TRS-80' MODEL I A II SOFTWARE FROM 

Johnson Associates -or- 24 Hour Order Line 
POBox1402M For Bank Cards Sales 

Redding, C A 96099 (916)221-0740 

•WRITE FOR FREE CATALOG- 
TRS 80' Registered Trademark of the TANDY CORP 
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Display your buffer contents in hex, ASCII or decimal. 



Buffer Analysis 



Robert M. Chambers 
74 Stinson Ave. 
Nepean, Ontario 
Canada K2H 6N4 



In my efforts to discover the 
various TRS-80 tape formats, 
I found that I had to write sev- 
eral assembler and BASIC pro- 
grams to do little bits and 
pieces of the work. 
To overcome the awkward- 



ness of frequently loading the 
different programs, I decided to 
write one program which would 
do all the jobs. 

Buffer Analyser is a program 
which displays the TRS-80's I/O 
buffer in ASCII, decimal or hex- 
adecimal format. 

The whole idea of this pro- 
gram is to read a record into the 
I/O buffer and display it on the 
screen in hex, decimal or ASCII. 
Using the I/O buffer overcomes 
the problem of truncated data 
which often occurs when a 
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Level II BASIC Compression Codes. 



string variable is used. 

According to the memory 
map provided in the Level II 
BASIC Reference Manual, the 
address of the I/O buffer begins 
at 16870 and ends at 17127. Us- 
ing the PEEK instruction within 
FOR-NEXT loops and referenc- 
ing this area, one byte at a time 
is accessed and processed for 
the chosen display format. 

When the command menu is 
displayed, you press A for 
ASCII, H for hexadecimal, D for 
decimal, N to read the next tape 
record, C to clear the buffer and 
X to stop the run. 

Hexadecimal display is most 
useful for my purposes and I 
have, therefore, supplied the list 
of compression codes in that 
(Table 1) form. This list is useful 
in analyzing BASIC program 
tapes and useful information to 
use for writing programs to 
renumber or change BASIC pro- 
grams. These codes are used in 
memory and on tapes to reduce 



the amount of storage needed 
for BASIC programs. 

The Level II manual also 
mentions that each line of 
BASIC code contains a car- 
riage return, a two-byte line 
pointer and a two-byte line 
number. The TRS-80 Microcom- 
puter Technical Reference 
Handbook says that a CSAVE 
will generate 128 zero bits, an 
A5 hex byte for synchronizing a 
read, a two-byte start address, 
a two-byte end address, the 
data and, finally, a one-byte 
check sum. The check sum is 
the sum of all the data. 

When you examine the buffer 
you will not see a lot of this. A 
BASIC program in hex will start 
00 2C D3 D3 D3. Presumably, 
this portion follows the sync 
byte A5, which is not shown. 
Using the code compression 
table below, you can find the 
start of the program state- 
ments and proceed to decipher 
the program. ■ 



Program Listing. 



1 CLEAR1000 

5 A$="0123456789ABCDEF" 

10 CLS:PRINTCHRS(23) :PRINT?528, "BUFFER ANALYZER" ;: FORZ= 

1TO1200:NEXTZ 
15 GOTO30 REM >>>>>>> TO MAIN LINE START <<<<<<<< 
20 CLS:AFS=CHR$(0) :PRINT@530, "PRESS A KEY TO READ THE N 

EXT RECORD"; 
25 AF$=INKEY$:IFAF$<CHR$(1)THEN25ELSECLS:PRINT§534,"TAP 

E RECORD BEING READ" ; : INPUT#-1,B$ 
30 AF$=CHR$(0) :CLS:PRINT§412,"PRESS";:PRINT@515,"A FOR 

ASCII, H FOR HEX, D FOR DECIMAL N FOR NEXT OR X TO 
END", -:PRINT@658, "PRESS C TO CLEAR THE BUFFER"; 
35 AF$=INKEY$:IFAF$<CHR$(1)THEN35 
40 IFAF$="A"THENGOSUB176:GOTO500 
45 IFAF$="H"THENGOSUB95: GOTO500 
50 IFAF$="D"THENGOSUB200:GOTO500 
55 IFAF$="N"THEN GOTO20 

60 IFAF$="X"THENCLS: GOT0999 
65 IFAF$="C"THENGOSUB700:GOTO30 
90 GOTO30 

94 • *************************************************** 

95 i***** THE CONVERT BUFFER AND DISPAY IN HEX ROUTINE 

***** 

96 ' *************************************************** 

***** 

100 CLS 

150 FORX=16870TO17127:A=PEEK(X) 
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155 B-FIX(A/16) :C-B*16:D=A-C 

160 PRINTMID5(AS,B+1,1) ;MID$ (AS.D+1 , 1 ) ; " "| 

165 NEXTX 

17 RETURN 

176 '***** THE READ BUFFER AND DISPLAY IN ASCII ROUTINE 

• •** 

177 '***********•***************»********»************* 



180 CLS 

185 FORX-16870TO17127:PRINTCHR$(PEEK(X));" ";:NEXTX 

190 RETURN 

199 •..»••*•***»•**•••••••*•***•**•••*****•••••***••••* 

200 •**** THE READ BUFFER AND DISPLAY IN DECIMAL ROUTIN 

E *** 

201 ' ************************************************** 

***** 

205 CLS 

210 FORX=16 870TO17127:PRINTPEEK(X) ; : NEXTX 

234 RETURN 

235 ■ ********** ********************************* ******* 

***** 

500 '******** THE DELAY AT END OF DISPLAY ROUTINE 

***** 
5B1 >.*.*. .***..*....*. ..*********••*••****••**** 

505 AFS=CHR$(0) 

510 AF$=INKEY$:IFAF$<CHR$(1)THEN510 

515 GOTO30: REM BACK TO MAIN LINE 

599 •**.**.*..***..*•.***•************•*•******** 

***** 
700 '***********««* CLEAR BUFFER ROUTINE 



701 



702 CLS :PRINT?540, "CLEARING"; 

705 FORX-16 870TO17127 : POKEX,0 : NEXTX 

706 CLS: PRINT§540 , "CLEARED 1 * ; : F0RZ = 1T0333 :NEXTZ 
710 RETURN 
997 i***************** THE END ROUTINE **************** 

***** 
99g < a************************************************* 
***** 

999 END 

1000 ' ************************************************* 
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taper 91th Sine* step/TRAtt/Oisassembler tor TBUG. the 
successor of TSTEP with the features of EMU. and more! 
Variable speed TRACE mode lets you run any Z80 machine 
languaQe program under total control, absolutely invaluable tor 
analysis or debugging. 

• Disassembler posts Z80 mnemonic in scrolling field 

• Single stepper displays selectable before/after Z80 Programming 
Models, stack elements and flag status 

• Variable speed TRACE mode animates Z80 Models and 
Disassembler under dynamic user control. 

• Intelligent RAM Window Shows selected local RAM 
environments or user designated RAM area 

• Foreground/background breakpointing. 

• Implicit keypad includes Backspace. Relative space. Block 
RAM displays, local editing, laster *P and *L. CLEAR, more. 

• Super tleGS relocates for total address space access 

Direct or single-step execution of CALLS and RSTs. tufty 
it display suppression, big booklet of instructions and 
Super STEP is a Z80 Mim CPU™ 

16K Level II TRS-80, TBUG required No BL $19 95 

taw II: Software emulation of the 6502 microprocessor TBUG 
displays byte. EMU takes it from there Now you can write. 
debug and execute 6502 programs w ye*r TU-M. 

• Disassembler posts 6502 mnemonic in scrolling held 

• Single stepper displays 6502 Processor Model, stack, flag 
status in before/after form 

• 4 Speed TRACE mode animates 6502 models, activates a 
keyboard scan port accessible to 6502 instructions. 

• Fait interpretive RUN mode lor rhealistic execution 

• Implicit keypad with Backspace. Relative space, more 

How to have a 6502 without having a 6502! Compare, contrast, 
learn a powerful programming language distinct from Z80 or 
BASIC, read Apple, PET code. A 6502 Mlwan cm' m 
1 6K Level II TRS-80. TBUG required No BL 1 $24 95 

Super TVESI: Onboard relocator tor TBUG. TSTEP. Super STEP 
1 6K Level II TRS-80. TBUG required No. LL $9 95 

TITO* Single-stepper lor TBUG, totally reifies your Z80. 
16K Level II TRS 80. TBUG required No LL 1 $1 1.95 

ALLEN GELDER SOFTWARE 



Include 75 each 
postage. CA add 67. 



1 



Box 11721 Main Post Office 
San Francisco, CA 94101 



TRS 80. TBUG tm Radio Shack/Tandy Corp 
Software CPU tm Alton Getder Software 
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TRS-80 



• Level II-16K 

• Expansion Interface 

• Centronics Printers 

• Verbatim Diskettes 

• Pertec Disk Drives 

• TRS-80 Disk Drives 



Reg Our Price 
849 00 749 00 
299 00 264 00 

799 00 & up 

3 20ea 

or 32 00 box of 10 

389 00 

449 00 



Business Software by 

• Robitron 

• Data Access Corp 

• Newdos+ by Apparat 

Specialist in complete 
business computer systems. 

zGarnersz 

Computer Center — - 
675 fast Avenue ""** 
Cedartown CA 30125 '** 
404-748-3614 or 748-8585 



* 

ros-ao. 
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YOUR TRS-80 CAN BE 
A TOUCH OPPONENT 

CIN RUMMY 2.0 plays a strong game, good 
enough to challenge an expert player 
Plays a full regulation game, keeps score to 
game level, allows rearrangement of 
player's hand, and changes strategy to 
counter its opponent's play. Hours of good 
card playing, a fascinating program, one 
you'll enjoy playing against and trying to 
beat. mcr-1 $1495 

CHECKBOOK PLUS solves the problem of 
monthly bank statement reconciliation 
No cumbersome tape record keeping Just 
do your checkbook once a month and let 
Checkbook Plus handle all the details and 
find the errors MCB-1 $9 95 

CALCULATOR PLUS is an onscreen or print- 
ing calculator, with chain and mixed calcu- 
lations, memories for answer storage or 
calculations with constants item count 
and on-screen or printed review of long 
add-and-subtract operations Optional 
dollar format MPC-1 $9.95 

CHECKBOOK PLUS and CALCULATOR PLUS 

both on one cassette MC-2 $14 95 

THE LISTMAKER Powerful, versatile pro- 
gram allows entry of 400 names with 
codes in 16K. Lists by code onscreen or to 
printer. Sorts, provides editing of name or 
code, dumping, loading lists ideal for clubs, 
organizations, small businesses, individuals. 
_ MLM-1 $9.95 

MANHATTAN SOFTWARE, In t 

P.O. box 5200 Grand centra I station 

New York City, New York 10017 
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Lots of data to display? 

Try these techniques for a tidier screen. 



Display Formatting 



Allan S. Joffe W3KBM 
1005 Twining Road 
Dresner PA 19025 



The time will soon arrive 
when you wish to display 
large numbers of data bits on 
your monitor. You have been 
aware of the formatting aids, 
such as the four printing zones 
and the TAB function, built into 
the TRS-80. As a start, enter 
Listing 1 and Listing 2 and run 
first one and then the other for 
comparison. 

You may have to carefully ex- 
amine Listing 2 to fathom how 



you got the same 40 numbers 
that Listing 1 gave you. The item 
of concern is really the dif- 
ference in format. In Listing 1 
the consecutive numbering is 
basically horizontal, while in 
Listing 2 the consecutive num- 
bering pattern is basically verti- 
cal. While it is a matter of 
choice, I prefer the Listing 1 ap- 
proach when formatting data on 
the video screen. 

Modifications 

Now consider this slightly re- 
vised version of Listing 1. If you 
are working with this article at 
your computer (which is the way 
to fly), just make the appropriate 
changes in the listing on your 
screen (see Example 1). In line 7 
there are three spaces between 
each X, Xt3 couplet. 



When you run this program, 
you will see we have added 
some data to illustrate the for- 
matting look. Beside each value 
of X (1 to 40) we now show the 
cube of each X value. If your 
TRS-80 has the same firmware 
quirk that my machine has, it 
will show a value of 8000.01 as 
the cube of 20. Now look at Ex- 
ample 2. 

Line 70 may be a momentary 
headscratcher, but if you 
worked out how line 70 in Listing 
2 functioned, the new line 70 in 
Example 2 will fall into place. 
Once again the difference in for- 
mats is a matter of taste and 
what you are used to. I personal- 
ly opt for Listing 2. 

Another formatting aid is 
shown in Listing 3. The equation 
in line 20 is a centigrade (Cel- 



sius) to Fahrenheit conversion 
based on the fact that -40 
degrees is a point of numerical 
equality for both systems. Line 
10 prints out Celsius tempera- 
tures from to 102 degrees in 
steps of 2 degrees (in conjunc- 
tion with line 30), and with the 
further aid of line 30, prints the 
corresponding Fahrenheit tem- 
perature beside the Celsius tem- 
perature. 

The real value you get from 
this effort will only come if you 
enter the programs into your 
computer. Once you have a feel 
for and an understanding of the 
methods outlined here, then 
comes the fun. You can experi- 
ment and improvise, and in so 
doing you are in great danger of 
becoming a better programmer. 
Don't say I didn't warn you! ■ 
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END 




Listing 1. 



50 CLS 

60 FOR X = 1 TO 10 

70 PRINT X.X + 10.X + 20.X + 30 

80 NEXTX 

90 END 



Listing 2. 



5 CLS 






7 PRINT @0,"X Xt3","X Xt3"."X 


Xt3" 


"X Xt3" 


10 FORX = 1TO40 






20 PRINT X; Xf3, 






30 NEXTX 






40 END 






Example 1. 
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END 




Example 2. 
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CLS 












10 


FORC 


= TO 24 STEP 2 








20 


F=((C + 


40). 1.8) - 


40 








30 PRINT C;F,C + 26;F 


+ 46.8.C + 52.F 


+ 93 6,C + 78;F + 140.4 


40 


NEXTC 




Listing 3. 
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The CONNECTION 

Telecommunication on All TRS-80's 
with or Without an Expansion Interface— 
For ONLY efc s 249°°! 

A Modem 

and 
Much More. 




• SOURCE 

• MICRONET 

• OTHER COMPUTERS 

Feature Checklist 

Direct connection between all TRS'80'S (Level I 4K to Level II. 48K) and the 
telephone network without accoustic coupling. 

RS 232 input ' output operates printers and other serial interface devices. 

Accurate performance at 300 baud (Bell 103 compatable) 

Connects to two-way radio equipment for computer communications over 
the air". 

Supplied with software and documentation Extensive optional software available 
For more information or to order: 

the micropenpheral corporation ^306 

PO. Box 529 Mercer Island WA 98040 

206 454 3303 

m 

TRS-80" is a registered trademark of Tandy Corp 

CONNECTION is a trademark of The Micropenpheral Corp 



QWORDFO RfflVA TTERRBGCYPQGZIVJBPCEB 
S H N B T X A XW REEIDEASEEOSRPVYXXON 
VLTWGYROS G\R\E DPVJKLMRHECTVXHNAFH 
BJELFEQAZG Z\P\P CRYPTOUPZAXZQJEJTS 
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FREE IDEA SEEDS T" 
Have you ordered yours? If not, you better reconsider. More 
than 5M0 happy subscribers think you don't know what you are 
missing. These are FREE programs for your TRS-80 and all you 
have to do to get them Is send us a legal size SASE. That Is 
all there Is to It. Simple? You betl Every month there's a 
new program and you really don't want to miss any of them! 
When you stop and think about It there are only three ways to 
build your software library. One way Is to write the program 
yourself. Another way Is to purchase programs. The best way 
Is to have the programs given to you and that Is Just what we 
are dolngl All FREE IDEA SEEDS are our own original programs 
and we want you to have them to use, rewrite, and expand. 
Send your legal size SASE to: 
CECDAT, Inc. ^62 PO Box 89*3 Moscow, ID 838*3 
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INTERFACE 



Use your 80 to check test measurements automatically. 



Testing 1, 2, 3 



D. C. Nelson 
4733 E. Linden 
Tucson, AZ 85712 



Have you ever wanted to 
use your computer as part 
of a measurement system? 
Soon after getting a computer, I 
began to wish that I could use it 
for recording and analyzing 
measurements from test instru- 
ments. 

The thought of my computer 
functioning as a data logging 
tool was enticing, but the 
thought of having to manually 



key in the data was not. There 
had to be a better way! 

Parallel Ports 

Fortunately there is a better 
way. I am referring to the 
parallel port, that neglected 
feature commonly used for little 
more than reading keyboards or 
driving printers. 

You can create both the hard- 
ware and software necessary to 
link your computer to outside 
measuring instruments without 
having to learn assembly lan- 
guage, since everything can be 
done under BASIC. 

Although most of what is 
presented is oriented toward the 
TRS-80, it is by no means limited 
to it. The S-100 bus computers 



are equally usable. Let's look at 
some of the requirements for 
linking test equipment to a com- 
puter. 

First, the data must be in a 
computer recognizable format 
and at TTL compatible levels. 
However, this does not mean 
that we are restricted to using 
only binary numbers. Binary 
code makes the most efficient 
use in space of a given number 
of bits but it is not always the 
easiest code to use. 

By redefining the meaning of 
each bit position in an eight-bit- 
word, we can make the code 
easier to work with in terms of 
the outside world. This is called 
binary coded decimal, or BCD 
for short. 




Fig. 1. One Parallel I/O Port. This example shows address 31 decoded. 



BCD Data 

A single eight-bit-word can ex- 
press any binary value from 
00000000 to 11111111, or from 
to 255 decimal. In a single- 
decimal-digit, it takes four bits 
to specify any of the possible 
values from to 9. The remain- 
ing binary combinations from 1 1 
to 15 are discarded. 

Since the computer operates 
on eight-bit-data, it is only 
logical to use the remaining four 
bit positions to represent 
another digit. Thus an eight-bit- 
word can be used to represent 
any number between and 99 in 
BCD format. Unlike a straight 
binary format, we now have 
some bit patterns that are il- 
legal. Example 1 shows how this 
process works. 

Why go to BCD? A quick look 
through an IC catalog will give 
part of the answer. Many com- 
mon components such as 
counters, A/D converters, and 
clock chips have BCD outputs 
already available. Many com- 
mercially available measuring 
instruments have auxiliary out- 
puts that are BCD coded. 

In addition, it is easier to tailor 
your computer to the number of 
digits you wish to resolve by us- 
ing BCD. 

BCD also has some disadvan- 
tages. First is the need for a 
method of converting between 
BCD and binary. 

Second, to have a large num- 
ber of BCD interfaces you must 
also have a large number of in- 
terconnections. Remember that 
each digit requires four bits, 
therefore four leads will be 
needed. For a six-digit frequen- 
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cy counter this means 24 bulky 
connections. (Multiplexing can 
cut this down but that gets more 
complicated.) 

Hardware 

Let's look at what it takes to 
get parallel data in and out of 
our computer. The TRS-80 has 
an edge connector on the back 
left that provides access to the 
CPU bus inside. 

An explanation of the pinout 
can be found in the back of the 
Level I manual. Oddly enough, 
this diagram was omitted from 
the Level II manual in the 
system I worked on. You will 
need Level II BASIC to make 
both the hardware and software 
function properly. 

The parts of the bus that in- 
terest us are the address lines, 
the data lines and the two con- 
trol lines labelled FN and OUT. 
The Z-80 CPU can address up to 
256 I/O ports. When this is done 
in the TRS-80, the CPU places 
the port address (0-255) on the 
lower eight address lines and is- 
sues the appropriate IN or OUT 
control command at the rear 
connector. 

If a word is being written to 
the port, the data bus will con- 
tain the byte being output and 
the OUT line will be strobed low. 
If an input byte is requested, the 
data bus is tri-stated to allow 
the input port hardware to place 
its byte on the bus and the IN 
line is strobed low. 

Whether a specific port 
number is used for input or out- 
put depends upon the design of 
the external hardware. It can be 
both. 

The first requirement in set- 
ting up a parallel port is for the 
computer to recognize its port 
address. This means we must 
decode a particular address. At 
the same time we must check to 
see if either the IN or OUT line is 
valid. These control lines tell us 
that the address is a port and 
not a memory. 

Fig. 1 shows an example of 
how this works. First we must 
pick an address that is not 
already in use. Let's use 31 as an 
example. 

The address bus has the ap- 
propriate lines inverted to make 
the inputs to the eight input 




INPUT 
PORT 
STROBES 



#8 

# ' 

• 6 

OUTPUT 
» #5 PORT 

STROBES 



_TL 



Fig. 2. Decoding 8 Parallel I/O Ports. Input & output circuits are the same as Fig. 2. 



NANO gate high when address 
31 is given. This signal is in- 
verted and gated with the in- 
verted OUT command to form a 
strobe pulse for the latch. 

For an input port we decode 
the address in the same way ex- 
cept we use the JN line. Instead 
of a latch, we must now use a tri- 
state buffer to place the input 
byte on the data bus. Note that it 
is possible for an input and an 
output port to have the same 
numerical address. The control 
lines tell which of the two is to 
be active. 

Multiple Ports 

Obviously, a single I/O port 
will not suffice for all measure- 
ment applications. In order to 
address at least four, and prefer- 
ably eight ports, the address is 
decoded differently. 

First, we will say that all port 
addresses will be contiguous, or 
numerically sequential. The 
lowest address will be the 
boundary of the block. Since 



BINARY 


BCD 


DECIMAL 


01010010 
01001101 
00000011 
10000000 


10000010 
01111001 
00000011 
ILLEGAL 


82 

79 

3 

128 


010101 10 BCD = 56 DECIMAL 


Example 
Decimal 


1. Binary, BCD and 
Equivalents. One 


byte can represent any two 
digit number. 



eight ports will require three bits 
for the address within the block, 
this leaves five bits to define the 
block boundary. 

Addressing a specific port 
now requires three events to be 
true: The proper boundary as 
defined by A3-A7; the proper 
three-bit address as defined by 
A0-A2; and the IN or OUT com- 
mand as appropriate. Fig. 2 illus- 
trates this. (There are other 
ways of implementing parallel 
I/O ports. This method is shown 
because of its simplicity and the 
low cost of the parts.) 

If a full eight ports are placed 
on the bus, it should be buf- 
fered. If not, there is the possi- 
bility of overloading the bus with 
all the additional decoding and 
latching circuitry. 

Also, if you locate your inter- 
face at the end of several feet of 
cable, you can introduce error 
causing reflections onto the 
bus. As a final thought, consider 
the consequences if something 
goes haywire externally; you 
end up damaging some ICs and 
your connections are straight 



onto the bus. Need I say more? 

I built my buffer using tri-state 
gates on a small card that 
plugged straight into the edge 
connector. The buffer in turn 
had its own edge connector 
where the cable from the expan- 
sion interface was attached. I re- 
tained full use of the extra 
memory and the disk drive. 

Circuit speed posed no prob- 
lem. The IN and OUT signals 
are 1.4 microseconds wide, 
more than adequate settling 
time. 

Incidentally, the manual 
showed one of the pins on the 
edge connector providing +5 
volts. Check before you use it as 
mine turned out to be a ground. 
Because of the power draw of an 
eight port interface, plan on 
building a separate power sup- 
ply. 

(If you are working with an 
S-100 computer, see the article 
on building parallel port inter- 
faces in the Oct. 77 issue of 
Microcomputing, pp. 102-108. 
Although the mechanics of de- 
coding differ slightly, all other 



1000 REM BCD SUBROUTINE 










1010 N = INP(8) 


N = 


10010101 = 


95 BCD 




1020 N1 = N AND 15 


N1 ■ 


- 00000101 


= 5 




1030 N2 = N AND 240 


N2 = 


- 10010000 


= 9 




1040 N2 = N2M6 


N = 


10 • 9 ♦ 5 


= 95 




1050 N = 10 * N2 ♦ N1 










1060 RETURN 










Example 2. Subroutine to read an decode two 


BCD digits 


Bit 


masking and shifting are employed. 
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principles remain the same.) 

Check your work by instruct- 
ing the processor to write a 
specific byte to a port. Verify 
this with any instruments, from 
an LED to an oscilloscope. 

At the same time make sure 
that none of the other output 
ports are affected. 

To check an input port, selec- 
tively ground each bit and verify 
that the binary number returned 
changes by the appropriate 
power of two. 

Software 

Now that the hardware has 
been resolved, let's look at the 
necessary software. Under 
Level II BASIC we will make use 
of some special commands. The 
first are INP(X) and OUT(X,Y). 

The statement A = INP(8) in- 
structs the computer to read in- 
put port #8 and equate the value 
there to the variable A. (Note 
that at this time A can be from 
to 255 decimal.) 

To write to a port, tell the com- 
puter to OUT 8,Y and the value of 
Y in binary (not BCD) will appear 
on port #8. In the examples I am 
describing we cannot handle 
floating point numbers. 

Now we need the ability to 
selectively examine specific 
bits for deciphering the incom- 
ing BCD data. Earlier I said that 
one byte, and therefore one port, 



can represent two BCD digits. 
Since the computer uses binary 
and we are using BCD, some 
translating will be necessary. 

Assume we are using port #8 
and that it contains the BCD 
representation of the number 
95. Our program must read the 
port and return the number 95 in 
binary to the processor. 

The first step reads the port 
and places the number in the 
variable N. Next we mask off, or 
zero, the four most significant 
bits, leaving only the units digit. 
This is directly equated to the 
variable N1 for temporary 
storage. 

Then the four least significant 
bits of N are masked and the re- 
maining bits are shifted right 
four places. This number is di- 
rectly equated to N2 for storage. 
An artificial binary number is 
now created from each half of 
the BCD byte. Since the four 
least significant bits equate 
directly to 0-9 (not counting the 
illegals), the interpreted digit 
must lie in the four least signifi- 
cant bit positions. Anything else 
will give an erroneous result. 

The final step is to multiply N2 
by 10, add it to N1 and return the 
number as N. If this process is 
made into a subroutine, any por- 
tion of the program can get a 
two-digit number from port #8. 

Example 2 shows the me- 



1000 REM 6 DIGIT BCD READ 

1010 N1 = INP(8) 

1020 N2 = INP(9) 

1030 N3 = INP(10) 

1040 N1 = N1 AND 15 + (N1 AND 240V16 ■ 10 

1050 N2 = N2 AND 15 + (N2 AND 240V16 " 10 

1060 N3 = N3 AND 15 + (N3 AND 240V16 ' 10 

1070 N = N1 + 100'N2 + 10000'N3 

1080 RETURN 

Example 3. 6 digit BCD read subroutine. 



chanics and the coding in more 
detail. Try it longhand to con- 
vince yourself that it works. 

Masking 

The masking process is the 
key step in the conversion. Us- 
ing the AND command makes it 
possible to selectively turn off 
any combination of bits in a 
word and leave the remainder 
unchanged. 

Think of each bit in the input 
byte as one input to an AND 
gate and the other gate input as 
being the corresponding bit po- 
sition in the mask word. If the 
mask bit is high, the gate output 
equals the second input bit. 

If the mask bit is a zero, then 
the gate output is a zero, regard- 
less of the state of the other bit. 
This command will act on all 
eight bits at once. 

To determine the numerical 
value of the mask word, add the 
binary weight of the bit posi- 



BCD DATA 



OS 02 01 OO 



03 02 01 OO 



OS 02 Ql 00 



OS 02 01 00 



OS 02 01 00 



OS D2 Dl 00 



OS 02 01 00 



OS 02 01 DO 



OS 02 Ql 00 



OS 02 01 00 



OS 02 01 00 



OS 02 Dl 00 



OS 02 01 00 



D3 02 Dl DO 



OS 02 01 00 



OS D2 Dl 00 



as ot oi oo 



DS2 
DS i 
EOC 



u? 



Fig. 3. Interfacing a DVM chip. Multiplexed data is in latched parallel format. 



tions you want left unchanged. 

Following the masking pro- 
cess (which leaves the tens 
digit), the shift right by four is 
accomplished through dividing 
by 16. Since dividing by two is 
the same as shifting every bit 
position right by one, it follows 
that a division by 16 will produce 
four shifts to the right. The code 
in Example 2 is shown one step 
at a time for clarity. 

To obtain more than two 
digits of resolution (one part in a 
hundred is inadequate in many 
cases) use some of the addi- 
tional ports to give whatever 
amount is necessary. 

Each port is treated as in Ex- 
ample 2 except that the decoded 
numbers are scaled by the ap- 
propriate power of ten before 
being added. Remember when I 
said how easy it was to scale the 
system for any number of 
digits? All you have to do is to 
allocate sufficient ports and do 
the appropriate decimal scaling 
on the numbers. Example 3 
shows a subroutine for reading 
a six-digit frequency counter 
connected to three input ports. 

Output ports can be used to 
control relays, triacs, D/A con- 
verters, etc. One port can be 
used to control eight separate 
circuits by means of TTL com- 
patible reed relays or optical 
isolators. The OR command 
controls any specific bit without 
affecting the others. 

To establish how fast I could 
transfer values in and out I tried 
a couple of benchmark pro- 
grams. In each case the pro- 
gram transferred 1000 values to 
a single port in a FOR NEXT loop 
while doing nothing else. The 
output was finished in 6.4 sec- 
onds while the input took 7.3 
seconds. Using the subroutine 
in Example 3 took 115 seconds. 

Obviously the calculations 



138 • 80 Microcomputing, June 1980 



take their toll in speed. Consider 
however, the application you 
will be involved with, and if your 
experience echoes mine, the 
comparatively low speed is of 
little matter. 

What is important is that the 
computer is now doing more 
work and the programmer less! 
Also, it is almost always nec- 
essary for the computer to wait 
idly while the external instru- 
ment makes its measurement. 

A do nothing FOR NEXT loop 
can be used as a timer for such 
occasions. I have found that 340 
iterations take one second. 

Examples 

Let's look at a circuit that 



uses the methods I have de- 
scribed. Fig. 3 shows an analog 
to a digital converter using the 
Motorola MC14433 IC. This chip 
is the basic building block for a 
3% digit DVM. 

Note that most of the parts 
are used to convert the 
multiplexed BCD output to 
parallel latched BCD, which is 
compatible with the software 
described. This is a typical re- 
quirement for most instruments. 
In this application the multiplex- 
ing works against us. It is possi- 
ble to directly read a multi- 
plexed output, but it requires an 
intimate knowledge of the tim- 
ing of both the instrument and 
the computer. 



To do this, the computer must 
test the digit position it needs to 
read. When that digit is enabled, 
it must be read before the scan 
continues. All digits must be 
read in one scan so that an er- 
roneous reading will not be 
returned. This would occur if the 
measuring instrument updated 
its reading to a new value while 
the computer was still trying to 
read the remainder of the origi- 
nal one. 

Taking two readings and com- 
paring them before returning to 
the calling program is a worth- 
while check, if BASIC reads the 
data. 

The circuit shown in Fig. 3 il- 
lustrates a typical requirement 



for latching multiplexed data. If 
you intend to build it, or need 
more information on this par- 
ticular device, consult the 
Motorola CMOS manual. 

You can also call a machine- 
language program from BASIC 
to demultiplex the data in soft- 
ware and POKE the digit pairs 
into successive memory loca- 
tions. This eliminates the demul- 
tiplexing hardware. 

The subroutine in BASIC 
would then be modified to PEEK 
the memory locations as a 
source of data. Since the final 
program will depend on the 
specific instrument being inter- 
faced I will leave the rest to 
you.B 



Sc lowercase 
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Flexible client write-up/general ledger system designed by 
a CPA and developed by a computer specialist for CPA's, 
accountants and general businessmen provides large-scale 
computer features at micro-computer software costs: 

* designed for use by present employees 

* allows for up to 500 accounts 

' departmental financial statements Including 

budgets 

' retains standard journal entries 

* automatic balancing of transactions 
'fast entry & posting of transactions 

* easy to follow audit trail 

' conventional accounting symbols used 

For 9-program package on diskette with user manual 
send $495 to: 

Task Computer Applications 
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Bask Indexed Direct Access Method (BIDAM) is a disk 
access method designed to simplify programming of disk 
applications, reduce disk I/O and space requirements and 
improve response time, while maintaining a key -sequenced 
index to a data Hie. BIDAM permits programmers to place 
emphasis on applications rather than file accessing tech- 
niques, sorting, searching and disk space management. 

BIDAM functions are performed by invoking basic sub- 
routines which include: key searching, changing, addition 
and deletion. Each subroutine returns a status code in- 
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BIDAM ON DISKETTE WITH SAMPLE 
APPLICATION $79.00 
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STYLE 



We haf veys of making you 

tell us the information, you, keyboard, you! 



Keyboard Interrogation 



Michael R. Yarbrough 
14 Carmel Terrace 
Hampton VA 23666 

James B. Vosteen 
1765 A 11th Street 
Hampton VA 23665 



Have you ever wanted to do 
something over and over, 
while holding a key down? You 
found INKEY a little frustrating 
right? INKEY senses each key 
only once and then the key must 
be pressed again. 

What about the time you de- 
signed a real-time two-player 
video game and tried to process 
several keys at once? Again you 
were left hanging, since INKEY 
only processes the last key 
pressed. You can overcome 
these INKEY limitations by di- 
rectly accessing your keyboard 
memory, PEEKing. 

The Keyboard 

The TRS-80 keyboard con- 
sists of 53 single-pole single- 
throw normally open keys. The 
keyboard is designed as an 8 by 



8 matrix with the eight address 
lines (A0-A7) running horizontal- 
ly and the eight data lines 
(D0-D7) running vertically (Fig. 
1). 

The keys are divided into 
eight groups, most of them hav- 
ing eight keys per group. Each 
key represents an intersection 
of one address line and one data 
line. The CPU scans the data 
lines looking for an 'on' condi- 
tion (logical 1); once this is 
found it begins scanning the ad- 
dress lines for a similar 'on' con- 
dition. 

For example, if C is pressed 
the data value eight is stored in- 
to decimal address 14337; like- 
wise if 5 is pressed the data 
value 32 is stored into decimal 
address 14352. This informatoin 
is then processed by the Level II 
ROM which checks to see if the 
shift key has been pressed and 
then converts the code into the 
correct ASCII equivalent. 

Program Listing 1 generates 
Fig. 1 using Level II BASIC. Use 
it in the future when a program 
requires direct access to key- 
board memory. 



10 CL.S: PRINT TAB < 21 >"KEVB0ARD INTERROGATION": PRINT 

20 PR I NT " ADDRESS" : X= 1 4337 : D= 1 : C=64 : Z» 1 92 : V=Z 

30 FOR I - 1 T04 : G0SUB500 : NEXT I 

40 C-=43 : FOR I = 1 T02 : G0SUB508 : NEXT I 

50 PRINT-av,X:V=V+3:PRINT«V, "ENTER CLEAR BREAK"; 

60 C-31 : V-V+23! F0RI=1T04: PRINT*/, CHR*<X> ; 

70 C-C+ 1 : V»V+7 : NEXT I 

30 PRINT'S', -2, "SPACE" ; : Z=Z+64: X=X+D 

?0 PRINT<8Z,X:PRINT*Z+3, "SHIFT"; 

103 PRINT*731,"DATA UALUE"; 

110 V*777:D*1 

1 2© FOR I - 1 T03 : PR I NT*/ , D : D»D*2 : V=V+7 

130 NEXT I 

140 GOTO 140 

300 PRINT*/, X: V-V+3: F0RJ= 1 T03 

510 V=V+7: IFO90THEN PRINT*/," ":G0T0536 

320 PRINT<tV,CHR*<C>:C=C+l:IFC=60 THEN C=44 

330 i {EXT J J Z-^Z+64 : V=Z : X=X *D : D=D*2 

3 40 RETURN 

33C END 

Program Listing 1. 



The reason direct access to 
keyboard memory is so useful is 
because a key's value can be re- 
peated. The instant a key of a 
certain group is held down the 
address of that group will con- 
tinue to have that key's data 
value as long as the key is held 
down. Once the key is let up, the 
value in that address immedi- 
ately goes to zero. As long as a 
certain data value is contained 
within a group address you can 
execute a set of instructions. 
This function eliminates the 
frustration of using INKEY in 
your quick interactive games. 

Another INKEY weakness is 
that it can only return one key- 
stroke at any given time. Using 
PEEK you can detect two, three 
or even more keys being held 
down. 

There are two ways of doing 
this depending on what type of 
processing you need. If you 
need speed, design your pro- 
gram to use keys of the same 
group— one PEEK and several 



IF statements in a row. 

When looking for a single key 
pressed, use whatever data 
value is associated with that 
particular key. To check for two 
keys being pressed at the same 
time, take the data value of both 
keys, add them together and 
that is the value to check for. 

For example, suppose we 
want to make a game that 
moves a rocket up and down the 
left side of the screen and fires 
to the right from wherever it is 
currently located. The program 
might work as follows: to go up, 
press the up arrow; to go down, 
press the down arrow; to fire, 
press both the up and the down 
arrows. 

Note that the arrows are lo- 
cated in key group A6. The key- 
board routine might look some- 
thing like this: 

100 Z = PEEK<14400) 
200 IF Z = 8 GOTO 600 
300 IF Z^ 16 GOTO 700 
400 IF Z = 24 GOTO 800 
500 GOTO 100 

REM CONTINUE KEYBOARD 



: ". . " 


. _ 






1 '. " z 


&IMN T : :h 1 ,-32:t- 


2'«32!H. 3 >"-32:X»16349:V^0 




: 200 


"PIMT-t 1 ' t 


THIS PR0GRf»l CCHOHSTRHTES 


♦ ■ 


: ZK 


PRINT* 63. " ••• 


- HLTERUHTE t E'.'BOfWC' SC-HM 


»**" 


: ioc 


pp:iit«129. ...... 


simultaneous process ing of multiple kevs 


•***»- 


'. 300 


PRIHT«193," «•♦ 


■ -.: SINGLE fit REPEHT KEV FUNCTION <-.<. 


**+" 


'. £00 


PRINT«237." 


»; ALL USING THE BASIC PEE. FUNCTION «< 


• •■ 


*. ~cc 


PPItlT*402.CWR»Ol 


' - ^•>JES ROCKET UP- 




i 380 


F*Ii|T»466.CHP*'.32 


" - MOVES ROCKET VOW) 




i»ec 


PMKT4338.CHR* ?3 


- "W"ES ROCKET LEFT" 




:oco 


re i IT4994.CHR* ?4 


" - njIXS ROCKET RIGHT" 




2100 


PRIMT«tS4.CHt*< ?l 


• '2HP«.93»" - MOVES ROCKET UP Hit LEFT" 




z:oo 


PRIHT*7je.CHR*<»l 


* "CMRV<94>" - MOVES POCKET UP RND RIGHT" 




23 00 


RRINT478I CHPJ.32 


" * *CMU(93>" - MC».€S ROCKET KMN HNt LEFT" 




24oe 


PRI'iTi346.CrtR«.92 


" - ":HP*04 • - MOVES ROCKET COUN «* RIGHT" 




2300 


PO»E -1 .HC1 <iPOt.E. 


h'2 if».e;;«i.h:3> 




2600 


x»x+vihxi >*pee> • ;-.- 


1>ih 2 ■»peek'.x:>!H':3,>-pee* <:-.»i ■ 




2700 


P0KEX-I.I8SSP0KEX 


143lP0KE>.*l . 133 




1 2300 


•30Sue76OO 






2?oe 


IFX*Y-l<133WflNt>Y 


-*7TH6NV«-3 




7000 


:F: •'.'-! 13360m «•■.' 


-61THENV-; 




7130 


IF\»,'-1 .1336G7HEU 


-0 




zioe 


IP .♦■.■♦! 16333AMD-.1. 


i7THEHY>3 




730C 


IF *V*l>16383fl»&i* 


MTHENV— 3 




TWO 


ir.:*v*i ibsojthen 1 


-a 




3300 


■iC.702300 






:ioe 


2 -FEE' 1440O 






- roe 


IFr-STHE>iY--64 






3380 


:F2>16THENV*c4 






3 »e 


IF2>32THE!f.'--3 






•»oec 


IF2»64TKIf.'*-3 






-4 IOC 


IFZ-40THEMV--67 






- : so 


:F3- - 2THEJi-.'--«l 






1400 


IF2 »C7hET. '61 

iF2-30THEt<v~6r 






1300 


IF2"=OTHEtC600 






4600 


RETURN 


Program Listing 2. 
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600 Process up arrow and 

GOTO 100 
700 Process down arrow and 

GOTO 100 
800 Process both arrows and 

GOTO 100 



Two or more keys pressed 
that are not in the same group 
must be checked separately. 
For example, if you are looking 
for the A and L keys pressed at 
the same time you can check it 
as follows: 



X = P€EK(14337) 
Y = PEEK(14338) 
IF X =2 ANDY = 16 GOTO 



Keyboard Interrogation 

Program Listing 2 is a demon- 
stration of keyboard memory in- 
terrogation. The following is a 
brief description of each routine 
in Program 2: 



1000-2400 


Set up screen 


2500-2700 Saves next rocket 




position 




Restores old position 




Moves rocket to next 




position 


2800 


Call keyboard scan 


2900-3400 


Make sure rocket 




doesn't go ott top or 




bottom 


3500 


Continue looping 




KEYBOARD SCAN 


3600 


Get data value 


3700 


Checks for up arrow 


3800 


Checks for down ar- 




row 


3900 


Checks for left arrow 


4000 


Checks for right arrow 


4100 


Checks for up and left 




arrows 


4200 


Checks for up and 




right arrows 


4300 


Checks for down and 




left arrows 


4400 


Checks for down and 




right arrows 


4500 


Checks for no input- 




branches if true 




4600 Return to main pro- 

gram 



Conclusion 

In order to receive a response 
using the PEEK function, the 
key must be held down at the 
time the PEEK statement is exe- 



Fig. 1. 



cuted. You will receive the same 
response as long as you hold 
down the key. 

You can access all the keys 
using PEEK, except for BREAK 
and CLEAR. The reason being 
the Level II ROM Interpreter is 
constantly checking these keys 
and has priority over them. 



INKEY remains a powerful 
function that allows input of an 
ASCII character (string) that can 
be used without further process- 
ing. Using a combination of IN- 
KEY and directly accessing the 
keyboard memory, PEEK, you 
will be able to meet most of your 
programming needs. ■ 
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INTERFACE 



Use a Model 33 with your TRS-80, 

with no hardware modifications to your CPU. 



Teletype Interface 



Peter E. Noeth 
6906 Lenwood Way 
San Jose CA 95120 



Perhaps, like myself, you 
don't have a line printer to 
obtain hard copy from your 
TRS-80 but do have access to a 
Model 33 Teletype. The follow- 
ing circuit and assembly lan- 
guage program provides the 
necessary interface to the 
TRS-80 CPU (keyboard) through 
a 40-pin ribbon cable without 
making any modifications to the 
unit. It requires the Level II ROM 
modification. 

Whenever you power up your 
TRS-80, this program must be 
entered and started. If a pro- 
gram you are running crashes 
and you get "memory size" dis- 
played on your screen, the 
program must be restarted be- 
cause the normal initialization 
routine within the ROM will 
place the regular line printer 
pointer (058DH) in location 
4026H and 4027H. If this hap- 
pens, the teletype will still print 
but will not provide a line feed 
for each carriage return. 

The Circuit 

The address decoder section, 
made up of the 74LS30, 74LS139, 
74LS155 and one gate of the 
74LS04, decodes the address 
37E8H. This is the memory 
mapped address for the line 
printer. When it is available on 
the address bus and RD line is 
pulsed low, pin-5 of the 74LS155 
goes low enabling the Tri-State 
Buffer 74LS367. This places the 
binary bits 0011 or 3H on data 



lines D4-D7. The printer status 
routine within the ROM is look- 
ing for this combination to de- 
termine that the printer is ready 
for a character. The four bits are 
associated to the logic within 
the TRS-80 line printer. This in- 
terface only requires the use of 
one bit to indicate the printer is 
busy with an output. 

If the WR is pulsed low when 
the address is decoded, pin-11 
of the 74LS155 goes low taking 
pin-25 (TBRL) low on the UART. 
This loads the character on the 
data lines into the UART's inter- 
nal buffer. Then, it is transferred 
to the transmit register for out- 
put as serial data on pin-25 
(TRO). 

The Intersil IM6402 UART that 
I used has two signals which in- 
dicate this activity. 

Pin-22 (TRBE) goes low when 
the buffer is being loaded. 
Pin-24 (TRE) goes low for the 
duration of the output of the 
character on Pin-25 (TRO). 

These two signals are ANDed 
together by the 74LS03. Its out- 
put is used to indicate "busy" 
status to the TRS-80. See Fig. 1 
for the timing diagram. 

The UART's reset is tied to the 
TRS-80 system reset line so that 
when you hit the reset button on 
your TRS-80, the UART will also 
be reset and will clear its inter- 
nal registers. 

The NE555 timer chip is used 
to provide the necessary clock 
input to the UART. The clock 
rate is 16 x, therefore, an input 
frequency of 1.76 KHz will pro- 
vide serial output of 110 Baud. 
The adjustment can be made 
with a frequency meter on pin-3 
of the timer, if you have one, or 
can be adjusted using the tele- 



type itself as follows: input the 
following basic program and en- 
ter run. 

10 LPRINT "This is a test" 
20 GOTO 10 

This provides a continuous 
output to the teletype. Adjust 
the 50K potentiometer until the 
teletype begins to type the line 
correctly. Continue to turn the 
potentiometer until the teletype 
stops printing the message cor- 
rectly. Noting the number of 
turns between these two points, 
readjust the potentiometer to a 
point midway. This should then 
provide the proper Baud rate. 

The output at Pin-25 (TRO) is 
input to a gate of the 74LS04 
which is used as a buffer for the 
20MA current loop circuit. The 
two points marked + and - 
should be tied to the printer 



magnets in your Model 33 tele- 
type using its instruction man- 
ual for the proper connections. 

Hardware 

I built my interface on a gen- 
eral purpose wirewrap card with 
a 44-pin card edge connector us- 
ing sockets for all ICs. The rib- 
bon cable was soldered to a 
44-pin card edge connector as 
were the connections for the 
teletype and external + 5V pow- 
er supply. 

The only caution with this in- 
terface is the IM6402 UART 
which is a CMOS device and re- 
quires the normal grounding for 
static when handling. Also, re- 
member not to insert or remove 
this device with the power turned 
on. 

The parts can be purchased 



Description 



Quantity 

1 UART — Intersil IM6402 

1 74LS139 2-line to 4-line decoder 

1 74LS155 2-line to 4 line decoder 

1 74LS04 Hex Inverter 

1 74LS03 2-input nand open col 

1 74LS30 8-input nand gate 

1 74LS367 Tri-State butter 

1 NE555 Timer 

1 2N3638 PNP transistor 

2 4.7K 1/4W Carb. Comp. Resistor 

2 I00ohml/4W Carb. Comp. Resistor 

1 470ohm1/4W Carb Comp Resistor 

1 10K 1/4W Carb Comp Resistor 

1 10K 5% 1/4 Carb Comp Resistor 

1 50K 20-turn PC. Board Pot 

2 01 ul Mylar caps 

1 001 ul Mylar caps 

Misc. 

1 40-Pm IC socket 

3 16-Pm IC socKet 
3 14-Pin IC socket 
1 8-Pin IC socket 

1 General purpose 4 5 in. PC. Board 

w'44-Pm card edge connector 

1 44-Pin card edge connector 

A/R .1 uf Bypass caps (lor I. C s) 

1 40-Pin ribbon cable w/connector 

1 + 5V 1 amp Power Supply 

Parts list. 
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TRE 
TBRE 



u 

| 


u 

" 250 TO 790 ^SEC 




i_j l_i 

i 


i 


u 




h-2S0^SEC 




M DATA 1 1 II 







ORG 


7F62H 


;32610 DECIMAL 


7P62 


267F 


LD 


H,7FH 




7F64 


2E6F 


LD 


L,6FH 




7F66 


22264(7 


LD 


(4?26H) ,HL 


;NEW LINE PRINTER POINTER ADDRESS 


7F69 


3E39 


LD 


A,39H 


;56 LINES/PAGE 


7F6B 


32284? 


LD 


(4?28H),A 




7F6E 


CA??4? 


JP 


4???H 


; REENTER BASIC WITH "SYNTAX ERROR" 
.•DISPLAYED ON SCREEN 


7F6F 


79 


LD 


A,C 




7F7? 


B7 


OR 


A 




7F71 


CAD1?5 


JP 


?5DlH 


; PRINTER STATUS ROUTINE IN ROM 


7F74 


F5 


PUSH 


AF 




7F75 


CDD1?5 


CALL 


?5D1H 




7F78 


2?FB 


JR 


NZ,$-3 


;LOOP UNTIL PRINTER IS READY 


7F7A 


Fl 


POP 


AF 




7F7B 


32E837 


LD 


(37E8H) ,A 


; OUTPUT THE CHARACTER 


7F7E 


FE?D 


CP 


?DH 


;IS IT A "CR"? 


7F8? 


cgr 


RET 


NZ 




7F81 


CDDl?5 


CALL 


?5DlH 


;YES, WAIT UNTIL PRINTER IS READY 


7F84 


2?FB 


JR 


NZ,$-3 




7F86 


3E8A 


LD 


A,?AH 


;ASCII LINE FEED 


7F88 


32E837 


LD 


(37E8H) ,A 


; OUTPUT A "LF" 


7F8B 


DD34?4 


INC 


(IX+?4) 


.•INCREMENT LINE COUNTER 


7F8E 


DD7E04 


LD 


A, (IX+?4H) 




7F91 


DDBE?3 


CP 


(IX+?3H) 


.•COMPARE TO LINES/PAGE (56) 


7F94 


79 


LD 


A,C 




7F95 


C? 


RET 


NZ 


;IF NOT 56 LINES CONTINUE 


7F96 


DD36(T4^ 


LD 


(IX+?4H) ,0?H 


;ZERO THE LINE COUNTER 


7F9A 


?6?9 


LD 


B,?9H 


.-LOOP COUNT FOR 9 LINE FEEDS 


7F9C 


CDDl?5 


CALL 


?5DlH 




7F9F 


2?FB 


JR 


NZ,$-3 




7FA1 


3E8A 


LD 


A, ? AH 




7FA3 


32E837 


LD 


(37E8H) ,A 


; OUTPUT "LF" 


7FA6 


1?F4 


DJNZ 


7F9CH 


;LOOP UNTIL (9) LP'S ARE OUTPUT 


7FA8 


C9 


RET 






FiQ 


. 2. Assembly language program to interface a teletype to a TRS-80 16K, Level II. 



Fig. 1. UART timing diagram. 



from most of the suppliers who 
advertise in 80-Microcomputing. 
All parts, except the UART and 
the ribbon cable can also be pur- 
chased from any Radio Shack 
store. A three-foot ribbon cable 
with 40-Pin card edge connector 
can be purchased from Elec- 
tronic Systems, San Jose CA, 
part number 3CAB40 and the 
IM6402 UART from Advanced 
Computer Products, Irvine CA. 

Any +5V DC power source 
can be used or a small one can 
be built. Don't attempt to borrow 
+ 5V from your computer be- 
cause with the Level II modifica- 
tion and 16K RAM the power 
output is running close to maxi- 
mum. 

Software 

The assembly language pro- changes the lines per page to carriage return (ODH) and if it is 

gram is shown in Fig. 2. The ini- 56. The routine checks for print- found, outputs a line feed (OAH). 

tialization routine loads the new er status (call 05D1H) and out- It then increments the lines/ 

line printer pointer into location puts the character when ready, page counter, compares it to the 

4026H and 4027H as well as It checks each character for a line/page number (39H) and if 56 



1? REM * 


Teletype Interface - 16K TRS-80 Level II* 








29 REM * 


P.E. Noeth, San Jose, CA. May, 1979* 








39 REM * 


Answer Memory Size? — 3261?* 








4(7 REM * 


Run this Program - Enter System Command* 








59 REM * 


Answer Prompt with /3261?* 








19 For I 


= 3261? to 32680 








89 Read D 










9? Poke I 


, D 








199 Next I 










llflf End 










12? Data 


38, 127, 46, 111, 34, 38, 64, 62, 57, 50, 


40, 118, 


121 


183 


139 Data 


202, 209, 05, 245, 205, 209, 05, 32, 251, 


241, 50, 


232, 


55 


14? Data 


254, 13, 192, 205, 209, 05, 32, 251, 62, 


1?/ 50, 


232, 


55 


15? Data 


221, 52, 04, 221, 126, 04, 221, 190, 03, 


121, 192 


221 




16? Data 


54, 04, ?, 06, 09, 205, 209, 05, 32, 251, 


62, 1? 






17(1 Data 


50, 232, 55, 16, 244, 201 
Fig. 3. BASIC program to interface a teletype to a 


TRS-80. 







lines have been printed, zeros 
the line counter and outputs 
nine line feeds. This extra line 
feed activity creates a typed 
page consisting of a top margin 
of nine spaces, and 56 lines of 
type for a sheet length of 11.0 
inches. I have also included the 
routine in BASIC for those who 
do not have either "TBUG" or 
the "EDITOR/ASSEMBLER" to 
enter this program. See Fig. 3. 

After turning on the CPU an- 
swer the memory size question 
with "/32610." This protects the 
interface program from any BA- 
SIC program you enter. Enter 
the interface program, using 
either BASIC or assembly lan- 
guage. Enter the "System" com- 
mand and answer the prompt 
with "/32610". The display will 
return a "SN ERROR" and a 
READY> prompt. 

This is because of the JP 
4000H in the initialization rou- 
tine. (I have not as yet found the 
entry point in ROM which re- 
turns a "ready" without re-ini- 
tializating the various pointers 
in RAM.) The program is now 
ready and use of LPRINT and 
LLIST provides a line feed after 
each carriage return.! 
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J PC Products Announces a New High Speed Cassette System 

"The Poor Man's Floppy" for the TRS-80* 

$90 Kit ■ $120.00 fully assembled. 

The TRS-80* is a great small computer. But its cassette recording 
system can be very frustrating, particularly if you can't read an important cassette. J PC 
Products Company has developed an improved cassette system that uses your present 
cassette recorder but operates much faster with better reliability. The TC-8 plugs into the expan- 
sion connector on the back of the keyboard and saves and loads 5 times faster! Less than 
ONE BAD LOAD in a MILLION BYTES! With the VOLUME CONTROL ANYWHERE BETWEEN 1 AND 8. The 
TC-8 is available in an easy to assemble kit or fully assembled. JPC has an exclusive "can't fail" kit guarantee. 
If you build the TC-8 and for any reason it doesn't work, we will make it work at NO COST. All 
you have to pay is the shipping. We guarantee it. The TC-8 magic is partly done in software. So you have to 
load a small program in upper memory. It is usually out of the way there. We provide the software on a 
cassette that comes with the TC-8. Just load it in. Here's how you order. Send 
ir^>-v nrVVM I^TC f m *r\ $9000 for the kit ($120.00 fully assembled) plus $3.50 postage and handling 

JrV^ rKUUUdj \*\J. to JPC Products Co.. 12021 Paisano Court. Albuquerque, NM 87112 (N.M. 

Res. add 4% sales tax.) Credit card orders accepted by phone or mail. 
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UTILITY 



Treat assembly language tapes like 
BASIC with this interesting technique. 



CLOAD Assembly Language 



Alfred S. Baker, II 
2327 S. Westminster St. 
Wheaton, IL 60187 



Have you used the Radio 
Shack T-BUG program, In 
Memory Information program 
or Editor/Assembler? If you 
have, then you are probably 
wondering how these programs 
steal the computer away from 
Level I BASIC. You type 
CLOAD, load the tape, and then 
the unexpected happens. In- 
stead of getting the READY 
message, you are suddenly run- 
ning the program on the tape. 
What happened to BASIC? 
Where did it go? How did Radio 
Shack do that? 

I had to find out. Beyond sim- 
ple curiosity, I needed to do it 
myself. In this article you will 
see the detection process I 
used to discover how Radio 
Shack uses the CLOAD com- 
mand to load assembly lan- 
guage programs. I also provide a 
section of program code that 
will help you do the same thing 
with your assembly language 
programs. 

Why Bother? 

There are two ways to load 
an assembly language tape on 
a Level I TRS-80. The way Radio 
Shack tells you to do it is crazy. 
First, set the tape volume for 
Level I tapes and CLOAD the 
Editor/Assembler System tape. 
Next, change the volume to 
handle Level II tapes, type in 
the name of the assembly pro- 
gram's object file, and load that 
tape. And now comes the good 
part. The program should now 



be in the machine, but you still 
have to run it. To do this, type a 
slash (/) followed by the mem- 
ory address of the program . . . 
in decimal, no less! 

I had written a simple assem- 
bly language game for my two- 
year-old to play. My wife knows 
nothing about computers. Can 
you imagine me explaining this 
to her? Can you imagine the 
look she'd give me if I tried? 
You can also imagine how 
often she would do it. I'll pass 
her most likely comment on to 
Radio Shack: "You've got to be 
kidding!" 

Fortunately, there is another 
way of doing it. The Editor/ 
Assembler System tape, as 
well as the other programs I 
mentioned above, are all writ- 
ten in assembly language. They 
are all loaded with the CLOAD 
command. Unfortunately, how 
this is done is not documented. 
If my son was to enjoy the 
"benefits" of a computer- 
assisted education, then I had 
to figure it out. 

The first step was to go to my 
friendly Radio Shack store and 
buy the T-BUG program. This 
useful little product lets the user 
look around in memory and, in 
general, find out what is going 
on. If you plan to write very 
many assembly programs, I 
recommend that you get it. 

If I was going to figure out 
how to successfully abuse the 
CLOAD command, I needed an 
hypothesis. 

The one I developed was 
based on the way I write large 
programs for Z-80-type comput- 
ers. I assumed that the CLOAD 
routine gets control from the 
statement-reading routine via 



standard Z-80 CALL-RET Logic. 

The statement routine reads 
the word CLOAD from the key- 
board and does a CALL to the 
CLOAD routine. The CALL in- 
struction in the Z-80 places the 
address of the next instruction 
in the statement-reading rou- 
tine on the stack. 

When the CLOAD routine has 
finished reading in a tape file, it 
issues a RET instruction. This 
instruction takes the top ad- 
dress off the stack and 
branches to it. This takes the 
computer back to the state- 
ment-reading routine. 

Suppose the program being 
CLOADed replaces the address 
on the stack with its own ad- 
dress? Once the CLOAD rou- 
tine is done it will pick up this 
new address and return to it. 
Voila! The CLOADed program 
has taken control of the com- 
puter away from BASIC! 

There were two problems 



though. I didn't know where 
BASIC kept its stack, and even 
if I did, I still didn't know where 
on the stack the CALL instruc- 
tion would place the return ad- 
dress from the CLOAD routine. 
If 1 was going to replace it, I had 
to know where it was. 

First I had to find the stack. 
This turned out to be simple. At 
the back of the Editor/Assem- 
bler manual is a list of the ad- 
dresses for important routines. 
One of the addresses, 01C9H, 
is the entry point for Level I 
BASIC. I loaded T-BUG and, 
using its MEMORY command, 
looked at the routine beginning 
at 01C9H. One of the first things 
BASIC would have to do would 
be to set up the location of its 
stack. The first three bytes at 
this location were 310042. 
Paydirt! 

If you know your Z-80 ma- 
chine language (or have a 
reference book), you'll recog- 
nize these three bytes as the in- 



> REPLACE THE CORRECT STACK LOCATION 

4ife aeiee org 4ifeh 

41FE 8842 88288 TESTAD DEFH TEST 

;SET UP THE LOOP VALUES: 

: HL->TV SCREEN 

; f»= THE LOWEST CHARACTER VALUE 

0886 88388 TEST OEFS 8 

4286 21883C 88488 L0 HL, 3C88H ; TV 

4285 97 88588 SUB ft 

i NOW FOR THE LOOP. EACH SUCCESSIVE 

i CHARACTER IS PLACED IN EACH 

; SUCCESSIVE SCREEN POSITION UNTIL ME 

; ARE BACK TO CHARACTER 88. 

8888 88688 L00P1 OEFS 8 

4284 77 88788 LO <HL),A 

4285 23 80888 INC HL 

4286 3C 80988 INC A 

4287 28FB - 81808 JR NZ,L00P1 
; THE PROGRAM IS DONE. PROVE IT BY 
; LOOPING FOREVER. 

0886 01188 L00P2 DEFS 8 

4289 18FE 81288 JR L0OP2 

086e 81308 END 

Fig. 1. Testing the CLOAD hypothesis. 
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> DEFINE THE PROGRAM START AND OTHER 


»T0 LOCATION 41EFH AND THEN CREATES 


4432 7C 


83280 


LD A,H 


> IMPORTANT SYSTEM ADDRESSES. 


.THE CLOHDABLfc TAPE FOUR TIMES FOR 


4433 65 


63366 


OR L 


4466 68168 ORG 4466H 


.SAFETY EACH OF THE FOUR SETS CON- 


4434 26FB 


83480 


JR NZ, CRE158 


6666 66266 BEGIN DEFS 6 


SISTS OF TWO FILES: THE LOAD ROUTINE 


; OUTPUT THE 


REAL THING: THE PROGRAM 


8FE9 88366 C8SON EQU 6FE9H 


.AT 41FEH AND THE ENTIRE PROGRAM AT 


4436 CDE90F 


03508 


CALL CASON 


6F4B 88486 CASOUT EQU 6F4BH 


• 4468H 


4439 210644 


63660 


LD HL. BEGIN 


8EF4 88586 CASIN EQU 8EF4H 


i 


443C 115044 


03786 


LD DE.ENDJT 


01C9 88686 BASIC EQU 61C9H 


.FIRST, THE LOAD ROUTINE IS MOVED: 


443F CD488F 


03808 


CALL CASOUT 


4286 88786 BSTACK EQU 4288K 


0860 81668 CREATE DEFS 6 


• WAIT A BIT 


AGAIN 




; SET UP THE TWO ENTRY POINTS. THE 


4411 31B444 81788 LD SP.END1H32 


4442 219000 


83908 


LD HL,0 


; FIRST IS USED TO RUN THE PROGRAM FROM 


4414 218644 01886 LD HL, LOHDAD 


8860 


84880 


CRE200 DEFS 


; TBUG. THE SECOND IS USED TO CREAT fl 


4417 11FE41 61988 LD DE.BSTACK-2 


4445 23 


04180 


INC HL 


, CLOADABlE TAPE. 


44LA 610660 62888 LD 6CLOA108 


4446 7C 


84288 


LD A, H 


4489 C35644 88886 JP RUN 


441D ED60 82188 LD1R 


4447 B5 


84388 


OR L 


4483 C31144 88988 JP CREATE 


;NOW SET UP FOR FOUR COPIES 


4448 26FB 


84480 


JR N2.CRE280 


;THE LOAD ROUTINE IS READ IN BY THE 


441F 6604 82268 LD 6,4 


, THE BOTTOM 


SIDE OF 


THE 4 TIMES LOOP 


; CLOAD COMMAND BEGINNING WITH THE 


0866 8238fc CRE106 DEFS 6 


444A CI 


84508 


POP BC 


1 INSTRUCTION LABELED LOHDAD. ONCE 


4421 C5 82480 PUSH BC 


4446 10D4 


04600 


DJN2 CRE168 


.LOADED, IT GETS CONTROL AND LOADS IN 




444D C3C901 


04788 


JP BASIC 


; THE REST OF THE PROGRAM AND EXECUTES 


; WRITE THE FIRST FILE- THE LOADER 


;THIS IS THE 


PROGRAM 


START LOCATION: 


i IT. 


4422 CDE90F 62588 CALL CASON 


0660 


04880 


RUN DEFS 


4486 6642 01888 LOADAD D£f : W BSTACK 


4425 21FE41 62686 LD HL,BSTf€K-2 


■ t 






0666 81188 LOAD DEFS 6 


4428 216942 82708 LD DE. BSTACK-2* 


, 






4408 CDE98F 01268 CALL CASON 


LOA166 


i PLACE 


THE PROGRAM TO BE 


4468 COF40C 61388 CALL CASIN 


4426 CD4B6F 82880 CALL CASOUT 


; CLOADED HEM 




446E C35044 81488 JP RUN 


• NOW WAIT A BIT 








8886 81588 L0A166 EQU »-LOADAD 


442E 210060 82988 LD HL,8 


; 






i THE CREATE ROUTINE DOES ALL THE SETUP 


0888 83886 CRE156 DEFS 6 


0880 


04988 


END1T DEFS 6 


.WORK. IT MOVES THE LOAD ROUTINE DOWN 


4431 23 63186 INC HL 


8688 


05888 


END 


Listing 1. The instructions needed to prepare an assembly- language program for loading with the CLOAD command. 



struction "LD SP.4200H." SP is 
the stack register and 4200H is 
where the BASIC stack is lo- 
cated. One down and one to go. 

Now I had to find out which 
address on the stack I had to 
replace. Again, a little thought 
presented me with an easy an- 
swer. I had just loaded T-BUG, 
hadn't I? T-BUG is one of those 
enigmatic programs that al- 
ready was doing what I was try- 
ing to do. If it didn't use the 
same stack and if it didn't cover 
its trail, then somewhere on the 
BASIC stack should be the 
starting address for T-BUG, 
40B1H. 

This address Is provided in 
the Editor/Assembler docu- 
mentation. I took a look at the 
addresses on the BASIC stack 
using the T-BUG memory com- 
mand. Again success! The 
T-BUG starting address was sit- 
ting at location 41FEH, the first 
position on the BASIC stack. 

Into the Lab 

So far, I only thought I knew 
what was going on. Now I had 
to run an experiment. The test I 
decided on was quick, but it 
presented a slight gamble. I 
assumed that T-BUG didn't use 
the 13 bytes between memory 
locations 41FEH and 420AH. 
Using the memory command, I 
hand loaded the machine lan- 
guage code for the program in 
Fig. 1. I then used the T-BUG 



tape Punch command to put it 
on tape. I had a tape that 
should CLOAD on a Level I TRS- 
80. 

Studying the program in Fig. 
1 will tell you that it prints out 
the entire set of characters on 
the TV screen and then loops 
forever. I turned off the com- 
puter and then turned it back 
on. I wanted to make sure that 
the test wouldn't be fouled by 
anything left in memory. 

Next, I CLOADed my test 
tape. It suddenly became dif- 
ficult to read the screen. It was 
filled up with a large collection 
of characters. Not only that, 
but the keyboard wouldn't re- 
spond. The computer had gone 
into a loop. I had successfully 
CLOADed a home grown as- 
sembly language program. 

Doing it Right 

So much for the prototype. I 
needed a "production" version 
of this code. I needed a pro- 
gram or routine that could be 
used to create a CLOAD-able 
version of any assembly lan- 
guage program. Listing 1 con- 
tains the result. I place this 
piece code at the beginning of 
each of my assembly language 
programs. It divides the pro- 
gram into three logical com- 
ponents: CREATE, LOAD and 
RUN. 

The easiest way to describe 
this program addition is to take 



the three parts in reverse order. 
The RUN component is the orig- 
inal assembly language pro- 
gram unchanged. The only dif- 
ference is that the line ENDIT 
DEFS is added just before the 
END line. 

The LOAD routine contains 
three statements. It turns on 
the cassette tape, reads in a file 
and then jumps to the RUN pro- 
gram. Which file does it read 
in? Oddly enough, it is reading 
in everything: the CREATE, 
LOAD and RUN programs. How 
can a program read itself in? 
This is handled by the first com- 
ponent of the program. 

The CREATE routine per- 
forms the actual magic of this 
act. First, it copies the LOAD 
routine down to locations 
41FEH to 4208H. The condition 
for CLOADing an assembly pro- 
gram has been met. The loca- 
tion on the stack that must be 
replaced, 41 FEH, now points to 
4200H. Location 4200H now 
contains a routine that will load 
a tape file containing the RUN 
routine and jump to it. 

Now that the conditions have 
been set up, a tape must be 
prepared. The tape is written 
out four times. I never trust 
data on tape just once. The 
repeated section of code gener- 
ates two tape files separated 
by a time delay loop. The first 
file is the LOAD routine begin- 
ning at location 41 FEH. The 



second file is the complete pro- 
gram. We now have a tape of an 
assembly language program 
that can be loaded with the 
CLOAD command. 

Why didn't I let the entire pro- 
gram begin at location 41 FEH 
instead of moving a load 
routine down to that location? I 
had two reasons. I use T-BUG, 
which sits in locations 4000H to 
43FFH. Also, when I flip be- 
tween my program and BASIC, 
BASIC destroys the contents of 
41 FEH. That is where its stack 
is, remember? 

Conclusion 

What have we learned? First, 
even with a computer with poor 
or missing system documenta- 
tion, such as the TRS-80, it is 
still possible to learn a lot 
about the behind-the-scenes 
software. All that is needed is a 
little careful thought and some 
diligent experimentation. You 
must also have at least a few 
simple tools to work with, but 
without the former, they are 
nearly useless. 

Finally, we now have a sim- 
ple method for loading TRS-80 
assembly language programs. 
A process that Radio Shack 
made too complicated can now 
be done by my six-year-old 
daughter. As for two-year-old 
Nathan, his mother is having a 
ball teaching him on "her" com- 
puter.! 
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APPLICATION 



Use your disks to store questions and answers. 



Quiz Master 



Richard R. Eckert 
Colegio De Ciencias 
Universidad Catolica 
de Puerto Rico 
Ponce, PR 00731 



Because of the microcom- 
puter revolution presently 
occurring, it is feasible for in- 
dividual departments of univer- 
sities or colleges to purchase 
sophisticated computing equip- 
ment that can be used in a 
myriad of different applications. 
One such application creates 
question and answer files for ex- 
ams and quizzes. Such a tech- 
nique is used by the Physics and 
Chemistry Departments of the 



Catholic University of Puerto 
Rico in multi-section introduc- 
tory courses. 

The university recently pur- 
chased a Radio Shack TRS-80 
microcomputer with expansion 
interface, dual mini-floppies and 
a friction feed line printer. The 
total cost was slightly more 
than $3000. 

Two computer programs writ- 
ten in TRS-80 Disk BASIC form 
the heart of our exam-creation 
technique. The first program 
(Listing 1) permits a professor or 
secretary to add questions to a 
file on a mini-diskette. The sec- 
ond program (Listing 2) is used 
to prepare a quiz with questions 
selected from a given file either 
at random or by the professor. 

Once the questions have 



been selected, they are printed 
out on a ditto master on the line 
printer. The professor can then 
run off as many copies of his 
quiz as he desires. 

File Creation 

The first program reserves 
string space for all of the string 
variables used in the program, 
including 255 bytes for the 
characters used in a question. 
This number was determined by 
our decision to use just one 
physical record (255 bytes) for 
each question. 

In practice our courses are 
divided into chapter-size units 
with common objectives. We 
create one file for each unit, 
which usually means some 50 to 
100 questions. Since the capaci- 



ty of a Radio Shack formatted 
data diskette is 85,760 bytes, we 
can place up to 335 questions 
on one disk. This means some 
three to six course units per 
disk, and, depending on the 
course, some four to eight 
diskettes for all of the questions 
in a course. (Since our project 
has just begun, we have actually 
created only four question files 
on one diskette.) 

After clearing string space, 
the first program gives the user 
instructions. First, he is told to 
place the correct diskette in 
position and then asked the 
name of the file (course unit) to 
which he is going to add ques- 
tions. The variable used for this 
name is Y$. The program re- 
quests the number of the last 



Program Listing 1. 


210 PRINT'TO ENTER THE QUESTION AGAIN IF THERE ARE ERRO 

RS " 
220 PRINT 


10 REM <THIS PROGRAM WAS WRITTEN BY RICHARD R. ECKERT> 


20 REM <BOX 145, STATION 6, PONCE, PUERTO RICO 007 31 > 


230 PRINT'WHEN YOU SEE THE SIGN « >, BEGIN TO ENTER A Q 
UESTION . " 


30 REM <ITS PURPOSE IS TO STORE QUIZ QUESTIONS IN A DI 


SKETTE FILE> 


240 PRINT"HERE WE GO." 


40 CLS 


250 PRINT 


50 CLEAR1000 


260 F0RI-1TOM 


60 PRINT 


27 PRINT"QUESTION #";I+N 


70 PRINT"PUT THE CORRECT DISKETTE IN DISK DRIVE 1 1" 


280 PRINT"— >"; 


80 PRINT'TELL ME THE NAME OF THE QUESTION FILE YOU WISH 


290 LINEINPUTA5 


TO USE" 


300 CLS 


90 INPUTY$ 


310 PRINTAS 


95 Y$-Y$+"il" 


320 PRINT 


100 PRINT'WHAT IS THE NUMBER OF THE LAST QUESTION FILED 


330 PRINT'ARE THERE ANY ERRORS (YES OR NO)"; 


"j 


340 INPUTC$ 


110 INPUTN 


350 IFC$-"YES"THEN270 


120 PRINT"HOW MANY QUESTIONS DO YOU WANT TO FILE NOW"; 


360 PRINT 


130 INPUTM 


370 PRINT'NOW WE'LL FILE THE QUESTION" 


140 PRINT 


37 9 REM <OPEN THE FILE AS A RANDOM ACCESS FILE USING B 


150 PRINT"WHEN YOU ARE ENTERING A QUESTION, DO NOT USE 


UPPER 4 1> 


THE <ENTER>" 


380 OPEN"R",l,Y$ 


16 PRINT"KEY UNTIL YOU HAVE FINISHED IT. IF YOU COME 


389 REM <FIELD THE BUFFER HERE WE MAKE ALL 255 BYTES 


TO THE END" 


AVAILABLE FOR THE QUESTION> 


17 PRINT"OF A LINE BEFORE THE END OF THE QUESTION, USE 


390 FIELD1,255 AS D$ 


THE DOWN ARROW" 


399 REM <PLACE THE QUESTION IN THE BUFFER> 


180 PRINT'IN ORDER TO CONTINUE ON THE NEXT LINE. WHEN 


400 LSETD$-A$ 


YOU HAVE FIN-" 


409 REM <PUT THE CONTENTS OF THE BUFFER INTO RECORD NU 


190 PRINT'A QUESTION, HIT <ENTER>, AND THE COMPUTER WIL 


MBER I+N OF THE FILE> 


L ECHO BACK EX-" 


410 PUT1,I+N ;' 


200 PRINT'ACTLY WHAT IT HAS RECEIVED. YOU WILL THEN HA 


420 CLOSE 


VE THE CHANCE" 


4 30 NEXT 
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question filed (N); if it is a new 
unit he should answer with a 
zero. The next few print state- 
ments describe the way in which 
the user should enter questions. 

The important point here is 
that when the user comes to the 
end of a line, but not the end of 
the question, he should use the 
down arrow instead of the 
ENTER key. This is necessary 
since the LINEINPUT instruc- 
tion (used later in the program) 
terminates the input of a string 
when it receives an ENTER 
(ASCII code 10 or 13). The down 
arrow (ASCII code 26) causes 
the computer to jump to the next 
line without terminating the in- 
put of the string. 

After the program finishes 
giving the user instructions, the 
loop beginning at line 260 asks 
for a question, receives it in the 
variable A$ through the LINEIN- 
PUT instruction (line 290). prints 
the question as received and 
asks if there are errors or not 
(lines 300 to 330). If so, the user 
must enter the question again. If 
not, lines 370 to 420 file the 
question A$ in the appropriate 
record (I + N) of the appropriate 
file Y$. The file is then closed, 
and the loop repeats. 

Selecting Questions 

The second program selects 
questions from a file and prints 
them on a ditto master in the 
line printer. The user must insert 
the correct diskette, give the 
computer the name of the ques- 
tion file desired (Y$), the total 
number of questions in the file 
(N), the number of questions to 



be selected for the quiz (M), and 
whether they are to be chosen at 
random or by the user. 

If they are to be selected at 
random, the computer will make 
the selection without duplica- 
tions (lines 260 to 320). print out 
the numbers chosen, and ask 
whether they are satisfactory 
(lines 330 to 370). If not, it will 
choose another random group. 
If the user wishes to choose his 
own questions, the computer 
will request the numbers 
desired (lines 210 to 240). 

The program finally instructs 
the user to place a blank ditto 
master in the line printer, and, 
when everything is ready, pro- 
ceeds to get the selected ques- 
tions from the file and prints out 
the quiz (lines 410 to 520). 

General Comments 

Although we are just starting 
to use the exam-creation tech- 
nique it seems especially 
helpful to those instructors who 
have many sections of the same 
course and wish to give frequent 
quizzes without duplicating 
questions. 

Also in small departments 
which do not have a full-time 
secretary (such as in our 
Physics Department), the 
technique can be of enormous 
value, as countless hours of typ- 
ing time are saved. 

In the near future we hope to 
modify the technique so that the 
question files can be created on 
cassette tape using a simple 
TRS-80 Level II BASIC system. 
Entering these questions is real- 
ly time-consuming! ■ 



Program Listing 2. 



10 REM <THIS PROGRAM WAS WRITTEN BY RICHARD R. ECKERT> 
20 REM <ITS PURPOSE IS TO SELECT QUESTIONS FROM A DISK 

ETTE FILE AND> 
30 REM <TO PRINT THEM ON A DITTO MASTER IN THE LINE PR 

INTER. "> 
40 PRINT 
50 DIMZ(20) 
60 CLS 

70 CLEAR1000 

80 PRINT'PLACE THE CORRECT DISKETTE IN DISK DRIVE I 1." 
90 PRINT-TELL ME THE NAME OF THE QUESTION PILE YOU WISH 

TO USE." 
100 INPUTYS 

110 PRINT'WHAT IS THE NUMBER OF QUESTIONS IN THE FILE"; 
120 INPUTN 

130 PRINT'HOW MANY QUESTIONS DO YOU WANT IN YOUR QUIZ"; 
140 INPUTM 
150 PRINT 
160 PRINT" NOW WE'LL SELECT THE QUESTIONS IF YOU WANT 

THEM AT RANDOM," 
170 PRINT" ANSWER WITH AN 'R'" 
180 PRINT* IF YOU WANT TO SELECT THEM YOURSELF, USE ANY 

OTHER KEY." 
190 INPUTCS 
200 IFC$-"R"THEN260 



210 PRINT'ENTER THE NUMBERS OF THE QUESTIONS YOU DESIRE 

ONE BY ONE" 

220 FORJ-1TOM 
230 INPOTZ(J) 
240 NEXT 
250 GOTO400 

259 REM <THE FOLLOWING ROUTINE SELECTS THE QUESTIONS A 

T RANDOM > 

260 FORJ-ITOM 
270 Z(J)»RND(N) 
280 IFJ»1THEN320 
290 F0RL-1TOJ-1 

300 IFZ(L)»Z(J)THEN270 

310 NEXTL 

320 NEXTJ 

330 PRINT'THE QUESTIONS CHOSEN WERE:" 

340 FORJ-1TOM 

350 PRINTZ(J) 

360 NEXTJ 

370 PRINT'IS THE SELECTION SATISFACTORY (YES OR NO)"; 

380 INPUTES 

390 IFE$-"NO"THENPRINT"WE'LL TRY AGAIN" :GOTO26 

400 PRINT 

410 PRINT "NOW WE'LL GET THE QUESTIONS FROM THE FILE AND 

PRINT THEM" 
420 PRINT'ON A DITTO MASTER IN THE LINE PRINTER." 
430 PRINT" PUT THE DITTO MASTER IN THE PRINTER AND TURN 

IT ON." 
440 PRINT'WHEN YOU'RE READY HIT ANY KEY." 
450 INPUTFS 

459 REM <OPEN THE FILE AS A RANDOM ACCESS FILE USING B 

UFFER • 1> 

460 OPEN"R",l,Y$ 

469 REM <FIELD THE BUFFER ALL 255 BYTES FOR A QUESTI 

ON, AS IN THE FILING PROGRAM) 

470 FIELD 1, 255 AS D$ 

479 REM <BEGIN LOOP TO GET AND PRINT THE QUESTIONS CHO 

SEN> 

480 FORJ=lTOM 

489 REM <GET RECORD * Z(J) FROM THE FILE AND PLACE IT 

IN THE BUFFER> 

490 GET1,Z(J) 

499 REM <PRINT OUT ON THE LINE PRINTER THE QUESTION SE 

LECTED> 

500 LPRINTD$ 
510 NEXT 
520 CLOSE 
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MONTHLY NEWSMAGAZINE 

Practical Support For Model I & II 



MONTHLY 
NEWSMAGAZINE 

FOR TRS-90 ' 
OWNERS 



PRACTICAL APPLICATIONS 
BUSINESS 

GAMBLING • GAMES 
EDUCATION 
PERSONAL FINANCE 
BEGINNER'S CORNER 
NEW PRODUCTS 
SOFTWARE EXCHANGE 
MARKET PLACE 
QUESTIONS AND ANSWERS 
PROGRAM PRINTOUTS 
AND MORE 



PROGRAMS AND ARTICLES PUBLISHED IN OUR FIRST 12 ISSUES 
INCLUDE THE FOLLOWING: 

A COMPLETE INCOME TAX PROGRAM (LONG AND SHORT FORM) 

INVENTORY CONTROL 

STOCK MARKET ANALYSIS 

WORD PROCESSING PROGRAM (FOR DISK OR CASSETTE) 

LOWER CASE MODIFICATION FOR YOUR VIDEO MONITOR OR PRINTER 

PAYROLL (FEDERAL TAX WITHHOLDING PROGRAM) 

EXTEND 16 DIGIT ACCURACY TO TRS 80" FUNCTIONS (SUCH AS 

SQUARE ROOTS AND TRIGONOMETRIC FUNCTIONS) 

NEW DISK DRIVES FOR YOUR TRS 80" 

PRINTER OPTIONS AVAIl ABLE FOR YOUR TRS 80" 

A HORSE SELECTION SYSTEM*** ARITHMETIC TEACHER 

COMPLETE MAM ING LIST PROGRAMS (BOTH FOR DISK OR CASSETTE 

SEQUENTIAL AND RANDOM ACCESS* 

RANDOM SAMPLING***BAR GRAPH 

CHECKBOOK MAINTENANCE PROGRAM 

LEVEL II UPDATES***1 FVF.L II INDEX 

CREDIT CARD INFORMATION STORAGE FILE 

BEGINNER'S GUIDE TO MACHINE 1 ANGUAGE AND ASSEMBLY 

LANGUAGE 

LINE RENUMBERING 

AND CASSETTE TIPS PROGRAM HINTS. LATEST PRODUCTS 

COMING SOON (GENERAL LEDGER. ACCOUNTS PAYABLE AND 
RECEIVABLE. FORTRAN «>. FINANCIAL APPLICATIONS PACKAGE 
PROGRAMS FOR HOMEOWNERS MERGE TWO PROGRAMS 
STATISTICAL AND MATHEMATICAL PROGRAMS (BOTH 
EI FMFNTARY AND ADVANCED) AND 



** 



S* 



L* 



WORD PROCESSING PROGRAM 

(Cassette or Disk) 

For writing letters, text, mailing lists, etc . with each 
new subscriptions or renewal 

LEVEL II RAM TEST 
(Cassette or Disk) 

Checks random access memory to ensure that all memory 
iocalions are working properly 



DATA MANAGEMENT SYSTEM 

(Cassette or Disk) 

Complete file management for your TRS 80" 

CLEANUP 

(Cassette or Disk) 

Fast action Maze Game 

• IH> ii " IS A T KADI MANX OF TANDY CORP 
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SEND FOR OUR NEW 48 PAGE SOFTWARE CATALOG (INCLUDING LISTINGS OF HUNDREDS OF TRS 80" PROGRAMS AVAILABLE ON 
CASSETTE AND DISKETTE) $2 00 OR FREE WITH EACH SUBSCRIPTIONS OR SAMPLE ISSUE 



•CQMPLiTRQMCS 



i 

a 
c 

Boi 148 Niw City. N*w York 10156 

ONE YEAR SUBSCRIPTION $24 

TWO YEAR SUBSCRIPTION $48 

SAMPLE OF LATEST ISSUE $ 4 

START MY SUBSCRIPTION WITH ISSUE 

(«1 - July 1978 • »7 - January 1979 • #12 - June 1979 • «18 - January 1980) 




£R\ 24 



HOUR 
ORDER 
LINE 
(914) 425-1535 




NEW SUBSCRIPTION 



RENEWAL 



CREDIT CARD NUMBER 
SIGNATURE 



. EXP DATE_ 



NAME 



ADDRESS 



STATE . 



-ZD>_ 



*** ADO tt/YEAR (CANADA. MEXICO) - ADO SI2/YEAR AH MAIL - OUTSIDE OF U.S.A.. CANADA 4 MEXICO ' 
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CQMPUTRQNICS 



c. 



FOR YOUR TRS-80 ••• 



TRS-SO Im a trademark of the Radio Shark Division of Tandy Corporation 



# All Orders processed within 24-Hours 
ir Free Shipping within U.P.S. areas (add $3 for orders outside of the U.S.A. or U.P.S. areas). 
•k 30- Day Money Back Guarantee on all Software (less a $3 penalty for handling). 

* 10-Day Money Back Guarantee on Disk Drives and Printers PLUS 120-Days Free Service. 



• LEARNING LEVEL II by David Lien 

The Original Author 0' The Level Manual 
A Step By Step approach to Learning Level " 
especially geared to new trs-80" Owners 
$15 95 



• TRS-SO DISK AND OTHER MYSTERIES 
$19.95 ($22.95 after 2/1/80). Over i oo pages 
of mdespensible information for disk owners 
Learn to recover information from bad disks 
how to make Basic programs unhstable and 12 
more chapters of never published tips and infor- 
mation Written by H C Pennington (For all 
Oisk Owners) 



NEW SBSG BUSINESS SYSTEM FOR 
MODEL I OR MODEL II - IN STOCK 

- General Ledger 

- Accounts Receivable 

- Accounts Payable 

- Payroll 

- Inventory Control With Invoicing 

• Each module can be operated individually 
or as a coordinated SYSTEM. Turn-Key error 
catching operation for beginners 

• Complete manual and documentation 
accompany each program 

• Minimum System requirements 2-Disk 
Drives for Model I. .1-Disk Drive for Model II 

• Each module can be formatted to span data 
on Upto 4-Disk Drives 

• Free 30-Day telephone consultation 

• Call for complete specifications 

• Model I Version $125 per module 
$495 per System 

• Model II Version $225 per module 
$995 per System 



DATA MANAGEMENT SYSTEMS 

- DMS replace index cards or any data 
requiring long lists of information 

• TBS In-Memory Information System 

(for cassette systems) $24 50 

• TBS Disk Data Manager (requires 1 or more 
disk drives) ..Set up fast random access 
files in minutes. Stores up to 320K of 
information on 4 Drives. Up to 10 fields 
and 255 characters per record Supports 
upper and lower case RS-232 or TRS-232. 
Features complete editing $49.50 

• Personal Software CCA Data Management j 
System ...Completely user oriented, menu 
drive. 130 page Step by Step Manual... 
capable of inventory control, sorting data, 
reporting data in nearly any form (for reports 
and mailing labels). Sorts data by up to 10 
fields for zip code, balance due. geographic 
location or whatever. Prints reports with 
subtotals and totals automatically calculated 
Fast random access $75.00 



•ffiBIRJTRQWXCSf 

Box 149 New City, N«w York 10956 
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FROM RACET COMPUTES 

• REMODEL-PROLOAO - Renumbers pro- 
gram lines, combines programs The only re- 
number program that will renumber the middle 
of a program Specify 16K 32K or 48K Works 
with Cassette or Disk . . . $34.95 

• GSF - Use m your Basic Programs for instant 
Sorting (will son lOOOitems in 9seconds) Other 
commands include Compress and Uncompress 
Data Duplicate Memory Display Screen 
Controls and Fast Graphic Controls . . . $24.95 
(For Cassette or Disk, specify 16K. 32K or 48K) 

• DOSORT - All G S F commands plus special 
Multiple Disk Sorting Routines . . . $34.95 
(Specify 32K or 48K) 

• INFINITE BASIC - Adds 70 commands to 
your TRS-80 including Instant Sort Matrix 
Commands String Commands Left and Right 
Justification Stnng Centering Simultaneous 
Equations Upper and Lower Case Reverse and 
more . . . $49.95 (For Cassette or Disk) 

• INFINITE BUSINESS (Requires Infinite Base) - 
Eliminate Round-off error 127-Dig>t Calcula- 
tion Accuracy Insert New Elements in Sorted 
Arrays Automatic Page Headings. Footings 
and Pagination Multiple Precision Arithmetic 
and more . . . $29.95. (For Cassette or Disk) 

• COPSYS - Copy Machine Language 
Programs . . . $14.95 (For Cassette only) 



FROM SMALL SYSTEM SOFTWARE 
RSM-2 Machine Language Monitor . . . $26.95 
RSM-2D Disk Version of RSM-2 . . . $29.95 
OCV-1 Converts Machine Language Programs 
from tape to disk . . . $9.95 
AIR RAID - The ultimate TRS-80 game con- 
verts your TRS-80 into a real time shooting 
gallery . . . $14.95 

BARRICADE - A fast pong style game . . $14.95 
CPM - $150 (for Disk only) 
TRS-232 INTERFACE - interface with Soft- 
ware driver RS-232 printers to your 
TRS-80 . . . $49.95 

TRS-232 FORMATTER Additional 
loptional) Software for TRS-232 owners Ads 
many printer commands to your 
TRS-80 . . . $14.95 ($9 95 with purchase of 
TRS-232) 



• MAIL PAC - For Model I or Model II Disk 
Systems only . . . $99.95. Quick-sorting full user 
control over mailing list from Gallactic Software 



FROM AOVENTURELAND INTERNATIONAL 
• ADVENTURE #1 - #8 by Scott Adams , 
$14.95 each available on Cassette or Disk 



SARGON II 

THE CHESS CHAMP 

$29.95 



FROM APPARAT 
NEW DOS ♦ $99.9$ 

35. 40 and 77 Track Versions available 



48-Page Catalog $2 FREE With Any Order 

Order by Phone or Mail 

No Shipping Charge 

Add $3 for COD 

Add $3 for all Foreign and non-UPS shipments 

Add $3 for UPS Blue Label 



FROM THE BOTTOM SHELF 

• CHECKBOOK II (for Cassette or Disk) . . 
$19.50 

• INFORMATION SYSTEM (tor Cassette or 
Disk . . . $24.50 

• SYSTEM DOCTOR (a complete diagnosis of 
your TRS-80 checks memory, video, cassette, 
disk ROM and all other parts of your system) - 
for Cassette or Disk . . . $29.50 

• CHECKBOOK REGISTER ACCOUNT- 
ING SYSTEM (requires 2 disk drives) . . $49.50 

• LIBRARY 100 - 100 established business, 
game and educational programs plusFREE Tiny 
Pilot all for . . . $49.50 

• BASIC TOOL KIT - lists all variables. GOTO s 
and GOSUB's in your program . . . $19.90 



• SOUNDWARE - Ads sound to your TRS-80 
Just plus it in . . .$29.95. Sample programs 
included 

• TING TONG - Can be used with Soundware 
•or a Sound version of pong . . . $9.95. 



VIC-The Carlo Visual Instructional $19 95 
Computer Program 

The Level II 16K Cassette is designed to teach 
beginners the Basics of Machine Language and 
Assembly Language Programming See every 
Machine Language Instruction Display on 
your Video 
VIC includes a Step By Slep 55 page manual 



VISTA V80 DISK DRIVE 

110 K OF STORAGE 

$395 

Add $29 95 for Cable 

iFree with Purchase of Two Disk Drives) 
— 10 Day Money Back Guarantee — 



FROM HOWE SOFTWARE 

MON-3 • Machine Language Programming for 
Beginners MON-3 is a Complete 
System Monitor with Users 
Manual $39.96 

MON-4 - Disk Version of MON-3 . . . $49.95 



LEVEL III BASIC . ■ . $49.95 FROM 
MICROSOFT - Now Cassette owners can add 
Disk Commands to their TRS-80 without owning 
a Disk Drive 



BRAND NEW OLIVETTI PRINTER . . .$3495 

Business Letter quality print. Automatic Line 
Justification (on request). Quick Printing, can 
be used as a Memory Typewriter, plugs nght 
into your TRS-80 without any modification or 
software 



THE ELECTRIC PENCIL 
Cassette . . . $99.95 

Dlak . . . $150.00 



HORSE SELECTOR II by Or Hal Davis . . . 
$50. The TRS-80 version updated for the TRS-80 
and originally reviewed in Systems and 
Methods 



& 



24 

HOUR ORDER LINE 

(914) 425-1535 
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iCQMPUTRQNICS- 

• • • EVERYTHING FOR YOUR TRS-80 . • • 

TRS-80 la ■ trademark of ihr Radio Shack Division of Tandy Corporation 

COORDINATED BUSINESS SYSTEMS 




SMALL BUSINESS 
SYSTEMS GROUP 



• EACH MODULE CAN BE OPERATED INDIVIDUALLY OR AS A COORDINATED SYSTEM 

• TURN-KEY ERROR CATCHING OPERATION FOR BEGINNERS 

• FREE 30-DAY TELEPHONE CONSULTATION WITH SBSG 

• EACH MODULE CAN BE FORMATTED TO SPAN DATA ON UPTO 4 DISK DRIVES 

• COMPLETE MANUAL AND DOCUMENTATION ACCOMPANY EACH MANUAL 

• MINIMUM SYSTEM REQUIREMENTS - 2 DISK DRIVES FOR MODEL I 1-DISK DRIVE FOR MODEL 



ACCOUNTS PAYABLE 

The accounts payable system receives data concerning purchases from 
suppliers and produces checks in payment of outstanding invoices. In 
addition, it produces cash management reports. This system aids in tight 
financial control over all cash disbursements of the business. Several 
reports are available and supply information needed for the analysis of 
payments, expenses, purchases and cash requirements. All A/P data feeds 
General Ledger so that data is entered into the system just once. These 
programs were developed 5 years ago for the Wang micro-computer and 
have been tested in many environments since then. The package has been 
converted to the TRS-80*" and is now a well documented, on-line, inter- 
active micro-computer system with the capabilities of (or exceeding many 
larger systems. 



CAPABILITIES 



ACCOUNTS RECEIVABLE 

The objective of a computerized A/R system is to prepare accurate and 
timeley monthly statements to credit customers. Management can gener- 
ate information required to control the amount of credit extended and the 
collection of money owed in order to maximize profitable credit sales 
while minimizing losses from bad debts. The programs composing this 
system were developed 5 years ago. especially for small businesses using 
the Wang Microcomputer. They have been tested in many environments 
since then. Each module can be used stand alone or can feed General 
Ledger for a fully integrated system. 



PAYROLL 

Payroll invoices many complex calculations and the production of reports 
and documents, many of which are required by government agencies It is 
an ideal candidate for the computer With this Payroll system in-house, 
you can promptly and accurately pay your employees and generate 
accruate documents/reports to management, employees, and appropriate 
government agencies concerning earnings, taxes, and other deductions 
The package has been converted to the TRS-80" and is now a well 
documented, on-line, interactive micro-computer system with the capa- 
bilities of (or exceeding) many larger systems. 

CAPABILITIES: 

* performs all necessary payroll tasks including: 

• file maintenance, pay data entry and verification 

• computation of pay and deduction amounts 

• printing of reports and checks 

* can handle salaried and hourly employees 

* employees can receive: 

• hourly or salary wage 

• vacation pay 

• holiday pay 

• piecework pay 

• overtime pay 

(Continued on next page) 



* menu driven; easy to use; full screen prompting and cursor cont'd 

* invoice oriented: everything revolves around the invoice; handles new 
invoice or credit memo or debit memo 

* invoice information recorded; invoice #. description, buyer, check 
register #. invoice date, age date, amount of invoice, discount (in %). 
freight, tax ($). total payable 

* transaction print and file maintenance procedures insure accuracy 

* flexible check calculation procedure: allows checks to be calculated for a 
set of vendors - or - for specific vendors 

* program prints your checks: contiguous computer checks with your 
company letterhead can be purchased from SBSG 

* reports include (samples on back): 

• open item listing/closed item listing - both detail and summary 

• debit memo listing/credit memo listing 

• aging 

• check register report (to give an audit trail of checks printed) 

• vendor listing and vendor activity (activity of the whole year) 

* fully linked to GENERAL LEDGER; each invoice can be distributed to as 
many as five (5) different GL accounts; sysem automatically posts to cash 
and A/P accounts 



CAPABILITIES 



* menu driven; easy to use: full screen prompting and cursor control 

* invoice oriented: invoices can be entered before ready for billing, when 
ready for billing, after billing or after paid 

* allows entry of new invoice, credit memo, debit memo, or change/delete 
invoice 

* allows for progress payment 

* transaction information includes: 

• type of A/R transaction 

• customer P.O. # 

• description of P.O 

• billing date 

• general ledger account number 

• invoice amount 

• shipping/transportation charges 

• tax charges 

• payment 

• progress payment information 

• transaction print and file maintenance procedures insure accuracy 

* customer statements printed; computer statements with your company 
letterhead can be purchased from SBSG 

* reports include: (samples on back) 

• listing of Invoices not yet billed 

• open items (unpaid invoices) 

• closed items (paid invoices) 

• aging 

* fully linked to General Ledger will post to applicable accounts: debits A/R. 
credits account you specify 
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(PAYROLL CAPABILITIES CONTINUED) 

* employees can be paid using any combination of pay types (except, hourly 
cannot receive salary & salary cannot receive hourly) 

* special non-taxable or taxable lump sums can be paid regularly or one time 
(bonus, reimbursements, etc) 

* health & welfare deductions can be automatically calculated for each 
employee 

* earnings-to-date are accumulated and added to permanent records; taxes 
are computed and deducted: US income tax, Social Security tax, state 
income tax. other deductions (regular or one time) 

* paychecks are printed; computer checks with your company letterhead 
can be purchased from SBSG 

* calculations are accumulated for. employee pay history. 941 A report, W-2 
report, insurance report, absentee report 

* fully linked to General Ledger. Each employee's payroll information can be 
distributed to as many as (12) twelve different GL accounts; system 
automatically posts to cash account. 



INVENTORY/CONTROL INVOICING 

• OVER 1000 ITEMS ON MODEL I 

• OVER 3000 ITEMS ON MODEL II 

• LOW STOCK ALARM 

• INVOICING DEDUCTS FROM INVENTORY 

• COMPLETE INVENTORY REPORTS 

• REORDER POINT REPORT 

• QUICK ITEM ACCESS 



CLIENT BILLING. STOCK CONTROL. DENTAL BILLING, COMMODITIES 
Medicare/Medicaid billing also available 



MODEL I 
MODEL II 



$125 Per Module 
$495 Complete System 
$225 Per Module 
$995 Complete System 



WE ARE THE ONLY SOFTWARE COMPANY THAT OFFERS A REFUND 
WITHIN 30 DAYS ON ALL SOFTWARE (H & E COMPUTRONICS 
MONTHLY NEWSMAGAZINE SUBSCRIBERS ONLY). WE DO 
CHARGE A $3 PENALTY TO COVER POSTAGE AND HANDLING 



GENERAL LEDGER 

The General Ledger accounting system consolidates financial data from 
other accounting subsystems (A/R, A/P. Payroll, direct posting) in an 
accurate and timely manner. Major reports include the Income Statement 
and Balance Sheet and a "special" report designed by management. The 
beauty of this General Ledger system is that it is completely user formatted. 
You "customize" the account numbers, descriptions, and report formats to 
suit your particular business requirements. These programs were de- 
veloped 5 years ago for the Wang micro-computer and have been tested in 
many environments since then. The package has been converted to the 
TRS-80" and is now a well documented, on-line, interactive micro- 
computer system with the capabilities of (or exceeding) many larger 
systems. 



CAPABILITIES 

* more than 200 chart of accounts can be handled 

* account number structure is user defined and controlled 

* more than 1 ,750 transactions may be entered via. 

• direct posting; done by hand; validated against the account file 
before acceptance 

• external posting, generated by A/R, A/P, Payroll or any other user 
source 

* data is maintained and reported by. 

• month 

• quarter 

• year 

• previous three quarters 

* reports (samples on back) include: 

• trial balances 

• income statement 

• balance sheet 

• special accounts reports and more .... 

* user formats reports with the following designed as you wish: 

• titles 

• headings 

■ account numbers 

• descriptions 

• subtotals 

• totals 

• skip lines 

• skip pages 

* up to eight levels of totals - fully user designated 

* menu driven; easy to use; full screen prompting and cursor control 



ICQMRJTRONICS! 



Boa t4t 



N»w City, New York 10956 



~^dfe\ HOUR — 

; $$\ 24 0R ?.! R *i^ 




LINE 
(914) 425-1535 



PLEASE SEND ME: 

MODEL I $125 PER MODULE 

$495 COMPLETE SYSTEM 

MODEL II $225 PER MODULE 

$995 COMPLETE SYSTEM 



CREDIT CARD NUMBER 
SIGNATURE 



EXP. OATE. 



NAME 



ADDRESS 



.STATE— 



-ZIP- 



ADD S6YEAR (CANADA MEXICO! ADD SI2/YEAR AIR MAIL - OUTSIDE OfUS* CANADA ^ MEXICO '" 
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HARDWARE 



Fit an external fuse to your power supply. 



Fuse Fix 



William P. Winter Jr. 
O'Higgins 3168 
1429 Buenos Aires 
Argentina 



Having just purchased a TRS- 
80 keyboard/CPU, adding a 
TV monitor and cassette record- 
er, I had the system up and run- 
ning, when — poof! — a fuse blew. 



ORIGINAL PC BOAAO 



^-ORIGINAL 

( r use 



Fig. 1. Original PC Board. 



Off went the TRS-80. 

To get to the fuse I cut open 
the plastic power supply case 
(badly designed by Radio Shack). 
The fuse, soldered to the printed 
circuit board, has pigtails. I 
soldered leads to a similar fuse 
and then turned on the TRS-80 
again. (Radio Shack had incor- 
rectly installed fast blow fuses, 
instead of the required slow 
blow, in a production run.) 

Everything worked fine for a 
half hour or so and then off it 
went. 

During the next few days the 
story repeated itself, and each 
time the fuse went, so did what- 
ever program I was working on. 

Change Your Fuse 

I knew the fuse was there to 
protect the expensive chips and 
that the TRS-80 designers prob- 



ably wanted to keep inexperi- 
enced users from installing too 
heavy a fuse. However, it was 
also impractical to send the unit 
to a service center every half 
hour from Argentina. 

If you have similar trouble you 
can remedy the situation by fol- 
lowing these steps: 

1. Remove the fuse and sol- 
der a jumper wire in its place. 

2. Remove the line cord lead 
from the printed circuit board 
and insert an in-line fuse holder 



MOOIF.EO *C BOAHD 




Fig. 2. Modified PC Board. 



in series with the line cord lead 
just removed. Cut one lead of 
the fuse holder long enough to 
pass through the opening at the. 
base of the supply and solder 
this lead to the hole previously 
occupied by the line cord lead. 
You can now solder the other 
fuse holder lead to the line cord, 
or do as I did and solder the line 
cord directly to the contact in- 
side the fuse holder. This re- 
quires more work but makes for 
a much neater job. 

3. Replace the fuse with a 
slow blow fuse of the same cur- 
rent rating. 

4. You can now glue the case 
back together. Use the special 
plastic cement available at toy 
and hobby shops. 

Since performing this minor 
surgery, I haven't blown a single 
fuse.! 



MicroPhase Systems 

Announces 

WORDSCRIBE for TRS-80. 

l*tWO*D»c*iaf transform your Model I or Model II 
TRS-80 into • high quality aord processing system. 

WORMCMM features Include: full screen 

editing, wrgln justification, line Insertion, 
line deletion, block move, block copy, find, 
change, and much much more. 

Model II $149.95 

req. 1 disk, 64k Mem. 
Model 1 disk version $ 99.95 

req. I disk, 48k mem. 
Documentation only % 9.95 

(can be applied to later purchase) 

STOCK MARKET DATA TAPES for TRS-80 Model I ! ! 

Each tape cassette contains one worths data for 
the NYSE or AMEX stock of your choice. Data 
Includes dally high, low, close, and volume 
Information. Can be read by any Level II Basic 
program with simple input statements. Available 
for Jan. 1979 to present. Please specify month 
and stock name. 

one months data S 5.95 

charting program 149.95 

(plots high, low, close and 2 moving avgs.) 



MicroPhase Systems 

11223 E. 45 St. So. #314 

Tulsa, Ok. 74145 
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DISASSEMBLED HANDBOOK 

FOR TRS-80 

VOLUME 1—510. POSTPAID 

Using ROM Calls in assembly language programming 
Seif-programmed learning course — 10 Chapters 
All BASIC ROM Calls— ROM ancillary functions 
CINT, CSNC & CDBL arhh/trig/log/etc. demo pgms 

VOLUME 2— SI 5. POSTPAID 

Advanced assembly language course — 1 3 Chapters 
Storing video in MEM for later use & recall 
Split -screen video with scroll/store/recall 
Decoding single & double precision numbers 

COMMENTS 

COMPUTER INFORMATION EXCHANGE— ship 100 

Vol. 2 

George Blank— Vol. I good intro. to ROM CALLs 

SOFT-SIDE— will reprint 3000 copies of Vol. I 

Alan Moluff — 1 especially recommend this book 

S-80 BULLETIN— A must for every SO bookshelf 

Charles Butler — most informative and accurate 

INTERFACE— save you 1 year's assy. lang. study 

Joni Koslcaki— we sold over 500 first 30 days 

THE ALTERNATE SOURCE— std. lent for using ROM 

Miller Microcomputing — ship us a canon ASAP 

CH1CATRUG— ship us another canon via Air Mail 

Bill McLaughlin— ship another 300 air freight 

R1CHCRAFT ENGINEERING L TD. *" 276 
Drawer 1065, Wahmeda Industrial Park 
Chautauqua, New York 14722 
phone (716) 753-2654 for COD orders 
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America's Largest Mail-Order Computer Store 

HOBBVWORID 

€l€CTflOIMICS, INC 

Coll Toll-Free: USA (800) 423-5387 ^ 

In Colif: (800) 382-3651 
Local & Outside USfi: 
(213) 886-9200 




Chess 
Challenger "7" 
Chess 
"VOICC" Challenger 

II you re into chess you will love 
Chess Challenger! 7 levels o< play. 
"Mate in Two" and "Chess by Mail". 
Like to have your opponent call out 
the moves? Try "Voice' Chess 
Challenger. 96.000 Bits ot Read Only 
Memory, and over 8,000 bits of Ran- 
dom Access Memory. Can be used by 
the blind as the game will audibly call 
every move, capture, and repeat 
board position 

Cat No. 2399 Chess Challenger "7" 
Cat No. 2398 Chess Voice Challenger 



Bockgommon 
Challenger $109.95 

Vou will be challenged and Intrigued 
by this game. Uses all strategies ol 
the game . including a running game, 
hit and run. blocking and bear oil 
games YOU handle the dice! Choose 
offense or defense. Computer 
responses vary every game. 
Weight 3 lbs 
Cat No. 2411 




$112.25 
$336.95 



TRS-80/nPPL€/€XIDV 

Everyth ng needed to upgrade your 
TRS-80. Appie or Exidy ! An additional 
16K includes illustrated instructions. 
RAMS. and preprogrammed jumpers 
No Special tools required Wt 4 oz 
CAT NO. DESCRIPTION 
1 156 TRS-80 Keyboard Unit 

11 56 A TRS-80 Exp.lnterlace 

1156B 



1156-C 
1156-D 



(prior to 4/1/79) 

TRS 80 Exp Interface 

(after 4/1/79) 

for APPLE II 

for EXIDY 



STAR TR€K III 

One ot the most advanced Star Trek 
games ever Locate the. 5 Class M 
Planets, battle Klingons, but watch 
out for black holes and pulsars. This 
version is 3 dimensional, not flat like 
other versions Watch the Enterprise 
phasers hit and explode the Kling- 
ons! Extensive use of graphics 
throughout At the end. return to Star 
Fleet command, where the data In the 
ships computer evaluates and rates 
your performance Takes about 2 
hours to play a game 
Cat No. 1041 TRS-80 level II/16K $14.95 




ATARI 

Home 
Video System 

The nation's best selling home video entertainment 

center is here! Currently supports a library of twenty 

video game cartridges with over 1300 variations and 

options. Comes with interchangeable joystick and 

paddle controllers, special circuits to protect home 

TV, realistic sound effects and produces crisp, bright 

colors on your TV screen. Also includes ATARI'S 

"Combat"' game with 108 variations and options. 



CAT NO 

2375 

2206 

2207 

2208 



CAT NO 

2376 

2377 

2378 

2379 

2380 

2381 

2382 

2383 

2384 

2385 

2386 

2387 

2388 

2389 



DESCRIPTION 
Stanhip 
Black Jack 

Spice War 
Surround 

Slot Machine 

Outlaw 

Slot Racer 

Video Olympics 

Breakout 

Canyon Bontbtr 

Street Racer 

Homarun 

Basketball 

Football 



DESCRIPTION »VT 

ATARI Video Computer Syitam 8 lb 

Driving Controller -Pair 2 lb. 

Paddle Controller Pair 2 lb. 

Joystick Controller-Par 2 lb. 

ATARI Gome Cartridges 

WT 
I o; 

6 oz 
6 m 



PRICE 
$179.95 
$ 19.95 
$ 19.95 
$ 19 95 



6 oi 
6(1. 
6 oi 
6 01 

6 o/ 
6 o; 

6 oz 

6 o; 
6 oz 
6 oz 

6 oz 



PRICE 
$15.95 
$15.95 
$15.95 
$15.95 
$1595 
$17.95 
$17.95 
$1795 
$1795 
$19 95 
$19 95 
$19 95 
$1995 
$19 95 



2390 
2391 

?39? 
2393 

ISM 

?395 
?396 

mi 



6o; 
6 oz 



Bowling 
Skydivei 

Fun With Numbers 6 o; 

Brain Game 6 ot 

Superman 6 oz 

Casino 6 oz 

Backgammon 6 oz 

Video Chess 6 oz 



$19 95 
$19 95 
$19 95 
$19 95 
$26 95 
$26 95 
$44 95 
$44 95 



NOT€: Not for use with 
ATARI Programmable 
Computers 



RDV€NTUR€ 

Explore an almost endless maze of 

treasures and pitfalls. Challenging 

and tun! 

TRS-80 L1/L2 16k 

Cat No. 1723 S14.95 



BRRRICRDC 

Similar to breakout. A real time game, 

with options of speed balls, angle, 

etc. 

TRS-80 L1/L2 16k 

Cat No. 1362 $14 95 



NOVATION "CRT" 
ACOUSTIC MOD€M 

The FIRST compact modem designed for the" 
small computer user Transmits data over stan- 
dard telephone lines Exchange data or pro- 
grams with other systems Data transfer rate up to 
30 char/sec Complete and ready to use Requires 
110 VAC, 60 Hz 
Cat No 1480 



Weight 3 lbs. 



Price: $189.00 



VCRBRTIM !%" DISK€TT€S 

10 per box 



CAT NO. 
1147 
1148 
1149 

2330 
2331 



TYPE 
525-01 

525-10 

525-16 

577-01 
577-10 

57716 



DESCRIPTION 

soft sector, TRS-80. 

Etc. 

10 hole, hard, 

Apple, North star 

16 hole, hard, 

micropolis 

soft sector certified 

10 hole, hard, 

certified 

16 hole, hard. 

certified 



PRICE 

$33.00 
$33.00 

$33.00 

$49.95 

$49.95 
$49.95 



TRS-80 To S-100 BUS ADAPTOR MINI 8100 



MfiTCHl€SS MS-80 
TRS-80 MINI DISK DRIV€ 



Plugs Into the expansion inter- 
face. Complete factory tested 
drive includes installation in- 
structions and software listing to 




Cat No. 

1375 

2964 
1396 
1938 
1485 D 
1147 



Description 

MS-80 Disk Drive 

2 Drive Cable 

4 Drive Cable 

Accessing Software, tracks 36-40 

MS-80 MPI 51 Manual 

Verbatim Diskettes, (box of 10) 



access 3 times faster than Radio 
Shack drives. 40 tracks instead of 
35. Existing 35 track software 
completely compatable 

Weight Price 

8 lbs. $395.00 

8 oz. t 19.9S 

Boz. S 39.95 

4oz. S 10.00 

2 oz. $ 1 50 

8 oz. $ 33.00 




MICRO SQUflR€D M2-250 
DOUBLC SID€D DISK DRIVCS 



Two "double sided" drives yield 
358k Bytes on TRS-80. 875k Bytes 
on S-100 systems Fast transfer 
rate of 250k Bytes'Sec. No 
modification of hardware or soft- 
ware necessary. Complete with 
Cat No Description 
2054 M2-250 Disk Drives 




Power Supply and Cabinet. Fac- 
tory tested. Life Expectancy 
20.000 hours, average media life 3 
million passes on a single-track. 
Pertec drives 



2329 



Weight 
15 lbs. 



•550-16 Hard Sector Diskettes 10 oz. 



Price 
$1195.00 

10 Box/$59 95 



Mini size, mini price, but maxi- 
performance. Available with 
adaptor circuitry and four slot 
shielded motherboard for direct 
S-100 use. or with adaptor on 
Cat No. Description 

1905 Kit wfmotherboard, one S-100 Conn 

1906 AST. Motherboard, 4 S 100 Conn. 

1907 kit. plugs into S-100 mainframe 

1908 AST, plugs Into S 100 mainframe 



S-100 card to plug into external 
S-100 mainframe. Opens up the 
vast world of S-100 Bus products 
to TRS-80 owners. Wt. 3 lb 



Price 
$11500 
$155 00 
$ 95 00 
$12500 



TRS-80 Lower Cose 
Modification Kit 

Modi'ies your mach ne to display 
both upper and lowei case Installs in 
minutes! Requires drill, soldering 
iron and screw-driver With complete 
instructions. > la ft A 
Cat No 1550 $19.00 

TRS-80 is a registered trademark 
ot the Tandy Company 



SRRGON II 

Hayden 

The champ of champs I Surpasses 
Mlcrochess, and even Sargon I! Ot- 
ters complex moves. 7 levels of play, 
activity indicator, a special "hint" 
mode, plus more ! The best chess pro 



gram ever 
Cat 



$29 95 
$29 95 



Page after page of exciting products. 
Computerized toys and games, per- 
sonal computers, disk drives, in- 
tegrated circuits, semi conductors. 
Add new dimension to your Apple, 
Atari. TRS-80, etc with our special ap- 
plication boards and comprehensive 
software library. Hundreds of pro- 
ducts available at terrific Hobbyworld 
prices. Circle our reader service 
number or write/phone for your free 
illustrated flyer today. 



HOW TO ORD€R 

Pay by chock Mastsrchargs, Visa, or C 
Charge card orders please include expiration 
date Payment in U S dollars only Order by 
phone mail or at our retail store MINIMUM 
ORDER $10.00 Please include phono number 
and magazine issue you are ordering from. 
Prices valid thru last day ot cover date SHIP- 
PING USA Add $2.00 lor first 2 lbs , 35i 
each addt'l lb tor ground. For AIR add $3 00 
first 2 lbs.. 75c each addt'l lb FOREIGN sur- 
face: $3 00 iirst 2 lbs . 60c each addt'l lb 
AIR: $11 00 first 2 lbs ,$5 00 each addt'l lb 
CODs add $1 25 addt'l. Not responsible lor 
typographical errors Some Hams subject to 
prior sale or quantity limitations. 120 day 
guaranteed satisfaction Eicoption partially 
assembled kits 



19511 Business Center Drive Dept. V6 Northridge, Co. 91324 



*■ Reader Service — see page 162 
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. . - We have them ALL 

All the Disks and Printers 
that interface to the TRS-80 

5V*" Drives — 8" Drives — Single and Double Density — 
and Hard Disk Systems with up to 40 megabytes! 



TRS-80 
Disk Drive 

SAVE 
OVER $100 

Vista, Percom, Lobo, 
and others 

Fully compatible with 

expansion interface 

and TRSDOS Software 

Some as Low as 

$359 



CP/M" OPERATING SYSTEM 

for Mod. I List $145 $129 

for Mod. II List $170 $149 

Complete line of CP/M Software available 
at discount prices 



CENTRONICS 
PRINTERS 



NEW 730 

w/friction 
and tractor 




CORVUS 10 megabyte hard 
disk for Mod. I or II 

ONLY $4795 



$679 ^ 

737 parallel, friction, tractor. List $995 . . . $849 
779-1 (TRS-80 Line Prtr. 1). List $1245 949' 

779 2 with tractor. List $1350 1049' 

702 2 120 cps. bi-directional. 

tractor. VFU 1995 

703-2 185 cps, bi-directional. 

tractor, VFU 2395 

(shipped freight collect) 

ANADEX 

80-COL. DOT MATRIX PRINTER 

1 



CONVERT YOUR EXISTING 

SELECTRIC TYPEWRITER 

TO A PRINTER . . . 

Power Supply & electronics, assembled & 
tested. You make only a simple solenoid 
installation (or have the factory do it). 
Manufactured by Escon 
Parallel version. List $575 . ONLY $514 

TRS-80 cable (specify MOD I or MOD III $25 




Complete upper and lower case ASCII char, 
set. bi-directional at 84 lines/mm. Features 
RS232 20/60 mil current loop and Centronix 
parallel interface. Ideal tor use with TRS80, 
Sorcerer, Cromemco. and North'Star systems 

OUR PRICE ONLY $749 

(shipping $101 




Bi-directional. 150 cps; logic seeking, adjust- 
able tractor. Available with lower case com 
pressed p r 'int. forms length control or vertical 
forms control option. Centronics style parallel 
interface also available 

T. 1 . 810 with serial/parallel interface 
List 1940 OUR PRICE $1735 

T.I. 810 printer outperforms Line Printer III. 



PAPER TIGER' 




Paper Tiger, List $995 ONLY $895 

w/graphics options, incl. buffer, $1 194 . . $989 

IP-225 w/1210, 1250 options. List $984 834 
IP 225 w/tractor. 1 21 0' , 2K buffer. & 

graphics options. List $1098 899 

TRS 80 cable 45 

•1210 option is expanded/compressed print. 

NEC SPINWRITER™ 




The Fantastic Letter-Quality 
Printer at 55 cps 

-CALL FOR PRICES - 



Printers for TRS-80 require Level II machines. 
Printer cables extra. Call for price and order 
number. 

* Same as Line Printer I 
t Same as Line Printer II 



SHIPPING AND INSURANCE Add $5 for Seiectnc Converter. $6 for disk dnves, $W for Megabox Centronics printers shipped freight 
collect Contact us for shipping information on other printers 
All prices sub/ect to change and all offers subject to withdrawal without notice Prices in this ad are for prepaid orders Slightly higher prices prevail for 



other-than-prepaid orders, i e.. C.O.D.. credit card, etc 



WRITE FOR FREE CATALOG 



MiniMicroMart, Inc. 

1618 James Street, Syracuse, NY 13203 (315) 422-4467 TWX 710-541 -0431 ^ 




r TRS-80 
SERIAL I/O 

• Can input into basic 

• Can use LLIST and 
LPRINT to output, or 
output continuously • 
RS-232 compatible • 
Can be used with or 
without the expansion 
bus • On board switch 
selectable baud rates 
of 1 1 0. 1 50. 300. 600. 
1200. 2400, parity or 
no parity odd or even. 
5 to B data bits, and 1 
or 2 stop bits DTP 
line • Requires +5, 
-12 VDC • Board only 
$1 9 95 Part No 8010. 
with parts $59.95 Part 
No. 801 OA. assembled 
$79.95 Part No. 8010 
C No connectors pro- 
vided, see below. 




cat** S' 93 Part 

■. awn 

3 r+Oar cab* 

MM WaMjaMl ' 

nadcy-ito'* TRS- 

ajU^P^ BO and our w>«t 

■^p^ , board S* 9 95 Part 

^■"■■■■■^ Mo 3CAB40 



COMPUCRUISE 




$1 2995; withcruse con- 
trol $169.95 



THETELESIS 

VAR-80 

INTERFACE 

UNIT 



f 



For the TRS-80 with 
Level II Basic • Provides 
8 outputs • Provides 8 
inputs • 2 ft. of inter - 
connecungcable w/con- 
nector • Plugs directly 
into TRS-80 • Power 
supply provided • As- 
sembled and tested. 
Part No VAR80. Intro- 
ductory pnce$ 109.95. 



GAME PADDLES 
& SOUND 




Includes 2 game pad- 
dles, interface, soft- 
ware, speaker, power 
supply, full documen- 
tation including: sche- 
matics,^ theory of 
operation, and user 
guide; plus 2 games on 
cassette (Pong and 
StarshipWar) $79.95 
Complete Part No 
7922C 



DISKETTES 



DIGICOM DATA 
PRODUCTS INC. 

Series 312 
Acoustic Coupler 




300 BAUD Originate. 
Part No AC3122. 
$219.95 300 BAUD 
Answer, Part No 
AC3122. $219.95. 
300 BAUD Answer/Or- 
iginate. Part No. AC3 1 23, 
$229.95. 



LIGHT-PEN 
ForYourTRS-80 




Your TRS-80 Light-Pen 
is a carefully engineered 
instrument and with the 
proper care will give 
satisfactory use and 
many years of service. 
Part No. TRS80LP 
$24.95. 



SYSTEM 

EXPANSION 

from 

LNW Research 

• Serial RS232C/20 
mA I/O • Floppy con- 
troller • 32 K bytes 
memorv • Parallel print- 
er port •Dual cassette 
port • Real-time clock 

• Screen printer bus • 
Onboard power supply 

• Software compatible 

• Solder mask, silk 
screen PC board and 
user manual. Part No. 
LNW80. $69.95. 




Verbatim 



Box of 10. 5 $29.95. 
8" $39.95. 
Plastic box. holds 10 
diskettes. 5' - $4 50. 
8" -$6.50. 



16KRAMS 

For the Apple 
TRS-80 or Pet $8 
each Part No. 4116/ 
2117. 



LEEDEX 
MONITOR 



CI 



12" Black and White* 
12 MHz Bandwidth 
• Handsome Plastic 
Case* $139. 00 



S-100 INTERFACE 




AN S-100 bus Adapter— Motherboard for the 
TRS-80 Kit. Part No. HUH81 DLXK, $295 95 
Assembled. Part No HUH81DLXA,$375 95 



NOW! 

A FULL SUPPORT SYSTEM 

FOR TRS-80 




• 32K of RAM • EPROM firmware • Disk 
control • Data acquisition • Parallel I/O • 
Serial I/O • Plug into GPA's Motherboard 
GPA's quality design includes • 6-44 pin edge 
connectors • t5V. -5V, \ 12V. -12V external 
power supply required • Active termination. 
The Motherboard, Part No. GPA80, is only 
$14995 

TAKE ADVANTAGE OF 

GPA-EXPANSION CARDS 

FOR THE GPA80 

Memory cards: Now with Fortran compilers 
available for your TRS-80, additional expansion 
memory is a must' Card with sockets only, Part 
No. GPAB01 .$1 1 9.95 Card with 1 6K of 41 1 6 
Dynamic Ram, Part No. GPA802 $224 95 
Card with 32K of 4 1 1 6 Dynamic Ram, Part No. 
GPA803, $329.95. All cards come equipped 
with sockets to accomodate 32 K of Ram. 
EPROM firmware card. Put those valuable 
subroutines in firmware Don't waste time 
loading and unloading tapes and disks For 2708 
or 271 6 EPROMS, Part No. GPA806. $79 95 
Serial I/O card. Here's what you've been 
asking for, a full serial terminal interface, with 
RS-232Cor20mA Current loop Input/ output 
capabilities. Part No GPA807, $79.95 
Parallel I/O Card. Control functions in the 
outside world, monitor and store real time 
events. Two parallel output ports. Dip switches 
select ports (0-254). Part No. GPA808. 
$79 95 



FLOPPY DISK 
STORAGE BINDER 




Three-ring binder 
comes with ten trans- 
parent plastic sleeves 
which accommodate 
either twenty, five-inch 
or ten, eight-inch 
floppy disks. Binder & 
10 holders $14.95 Part 
No. 8800; Extra holders 
95C each. Part No. 800 



DIGITAL 
CASSETTE 




5 mm. each side Box 
of 10 $9.95 Part No 
C-5. 



DISK JACKET 




Holds two 5-1/4 inch 
diskettes and will fit 
any standard three ring 
binder $9 95/ 10 Pack 



TRENDCOM 
PRINTER 

EJ 

• 40 characters per 
second • 4-7/16 inch 
wide thermal paper • 
Graphics (TRENDCOM 
100* 480 sevendot 
pnnt postions per line. 
TRENDCOM 100. Part 
No.TRC0100.$495.95 
TRENDCOM 200. Part 
No. TRCO2O0. $37595 
Interface for TRS-80. 
PartNo.T80A$45 95. 
For Apple II, Part No. 
TRCAII. $75.95. For 
PET. NO. TRCP2. 
$79 95. ForSccccerer. 
TRCSR1 $45.95. 



SARGON: A Computer 
Chess Program 

Features the complete program that won the 
1978 West Coast Computer Faire Tourna- 
ment Part No 00603 — TRS-80 Level II. 
Part No. 00604 — Apple II (24K) $19.95 



SOUND EFFECTS AND MUSIC 
FOR YOUR COMPUTER 




SOUNDWARE is a complete system It includes 
a speaker/amplifier unit with volume control, 
earphone jack, and connectors. It boasts 
excellent tone quality yet is small and convenient 
to use. Add batteries, plug it in, and play One 
year warranty. SOUNDWARE package (in- 
cludes INTRO to SOUNDWARE programs) 
PET (8K). Part No. 20003, $2995. TRS-80 
Level II (16K). Part No. 20002. $2995 
Compucolor II (8K). Part No. 20001, $39.95. 
INTRO to SOUNDWARE programs only PET 
and TRS-80. Part No 20005, $14.95 Compu- 
color II Part No 20006, $1995. 



Tq OrdGr* Mention Dart no description, and price. In USA shipping paid by us for orders accompanied by check or money order. 
We accept COD. orders in the U. S. only, or a VISA or Master Charge no., expiration date, signature, phone no., 
shipping charges will be added CA residents add 6.5% for tax. Outside USA add 10% for air mail postage and han- 
dling. Payment must be in U. S. dollars. Dealer inquiries invited. 24 hour order line (408) 448-0800 



Send for FREE Catalog ... a big self-addressed envelope with 41 « postage ge^s it fastest! 



ELECTRONIC SYSTEMS so 



P. 0. Box 21638. San Jose. CA USA 95151 



If you enjoy driving, you're going to get a 
COMPUCRUISE. Once you see what it can 
do, you just won't be able to live without it. 



i@PII 

S©K)diiB 
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nil 




I ft Rsmpuf^me 





This gadget fits into most dashboards ... no strain even in a tiny sports car like the Mazda RX-7 . . . and 
once you have it, every trip is like (lying a 747. The darned thing tells you the time, ho* fast you're going, how 
faryou*ve been on this trip or since the last regassing. how many miles per gallon you're getting, either at the 
instant or the average on the trip ... or gallons per hour at the moment or for the trip . . . temperature outside 
. . . inside (or coolant temperature, it you prefer) . . . oh, it has an elapsed time tor the trip, a stop watch, lap 
time, an alarm . . . how much further for your trip, how many gallons more the trip will take, how much longer 
for the trip at your present average speed . . . yes, it gives you your average speed for the trip. You prefer it in 
metric, no strain . . . liters remaining, etc. Did we mention that it also has cruise control either at a speed set 
on the control board or at whatever speed you are traveling? The Compucruise will keep you busy and enter- 
tained during any trip . . . telling you more than you will ever want to know. 

The Compucruise is not difficult to install . . . though it does connect to everything except the cigarette 
lighter. Until you've tried computerized travel, you haven't found out how much lun driving can be. It will work 
on any car not having fuel injection . . . and there is a (ront-wheel drive accessory gadget available for only 
$4.40-#P001 (regularly $5.50). 

The price for the Compucruise is regularly $199.95 . . . and a bargain at that price. We'll sell you one of these 
fantastic gadgets for $159.95 with cruise control (Model 44-<rP0O2). and $127.95 without (Model 41-#P003).Send 
money . . . and start having fun! 



MAIL ORDER MICROS -* 

Dept. 680 • PO Box 427 • Marlboro NH 03455 
Phone: [603] 924-3041* 
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#1 ADVENTURELAND 

YOU LL WANDER THROUGH AN EN 
CHANTEO I AND FNCOUNTFRING 
WILD ANIMALS AND MAGICAL 
BEINGS WHILE YOU TRY TO 
RECOVER LOST TREASURES 
Order tSAOOiT lot trs Level im6k 
•SA001S lor Sorcere' 1 6K iSAOOiA 
■o- Apple 24K- »I3 45 m,.-. on 

«2 PIRATE ADVENTURE 

SAIL T TREASURE ISlAND AND 
T RY TO RECOVER LONG JOHN 
SILVER'S LOST THEASURES 
0-der HSA002T lor T RS Leve I 16K. 
•SA002S 'or Sorcerer >6K. »SA002A 
lor Apple 24K-JI3 45 each on 

*3 MISSION IMPOSSIBLE 
ADVENTURE 

SAVE THE WORLD'S FIRST 
AUTOMATED NUCLEAR REACTOR 
WHEN YOU COMPLETE YOUR 
MICS ON 

Oroer ■SA003T lor trs Level I 16K 
•SA003S lor Sorcerer 16K »SA003A 
'or Apple 24K-$!3 45eao. on 

•4 VOODOO CASTLE 

SAVE COUNT CRISTO FROM T HE 

FIENDISH CURSE OR FOREVER BE 

DOOMFD-BEWARE THE VOODOO 

MAN 

Order #SA004T 'or TRS Level II '6K 

•SA004S 'or Sorcerer >6K. »SA004A 

lor Apple 24K 113 45 each on 

#5 THE COUNT 

LOVE AT FIRST BYTE FROM 

YOUR BIG BRASS BED IN 

TRANSYLVANIA. 

Order IISAOOST lor TRS Leve. 'I >6K 

•SA005S 'or Sorcerer *6K. »SA005A 

lor Apple 24K -t '3 45 each on 
taiselle 

#6 STRANGE ODYSSEY 

YOU RE MAROONED AT THE 
GALAXY S EDGE AND DISCOVER 
RUINS OF AN ANCIENT ALIEN 
CIVILIZATION AND TRY TO COPE 
WITH UNEARTHLY TECHNOLOGIES 
WHILE YOU AMASS FABULOUS 
THEASURES 

Order »SA006T lor TRS Leve I <6K. 
•SA006S 'or Sorcerer I6K. >SA006A 
lor Apple 24K-JI3 45 each on 



#7 MYSTERY FUN HOUSE 

FIND YOUR WAY THROUGH THE 
STRANGEST FUN HOUSE BEFORE 
THF WEIRD PARK CLOSES 
Order eSAOOrT lor TRS Level I 16K 
•SA007S 'or Sorcerer I6K. SA007A lor 
Apple 24K t<3.45 each on casselle 

#8 PYRAMID OF DOOM 

AN EGYPTIAN TREASURE HUNT 
THROUGH A NEWLY UNCOVERFD 
PYRAM'D COMPLETE WITH AN 
CIFNT CURSE 

Order eSAOOeT lor TRS Level 'I 16K. 
•SA008S loi Sorcerei I6K HSA008A 
lor Apple 24K-J'3 45 each on 
CMSM10 



Ever had your car stolen? 

The first reaction is one of disbelief . . . 

. . . you know it was right there 1 . 

What you want is a modern combination lock on your ignition . . . 
The Steal Stopper. It's easy to install and almost impossible to 
defeat. You can bypass it. if you want, for parking attendants or a 
car wash. Other than thai, you set up a secret four digit code and 
only you will then be able to start the car . . . even if you have the 
keys in 
the ignition. 

This protection retails for $50 . . . but we have a special for you at 
$39.95. Don't procrastinate. Order # P004. 

Note: This product works best on Detroit cars. Mazda RX7 
owners must order additional module, # P008. which costs $8. The 
Steal Stopper can be modified for Mercedes. Porsche, Ferrari, or 
other high performance European cars by returning unit to 
manufacturer with $3. They promise quick modification and return. 



BRAND NEW* TRS-80 
and accessories at FANTASTIC SAVINGS 

LEVEL II 16K COMPLETE $720 #TRS-001S 

16K EXPANSION UNIT. $400 #TRS-002S 

32K EXPANSION UNIT $525 #TRS-003 

DISK DRIVES $425 each (Specify which drive you want) #TRS-004 

FRICTION MODEL PRINTER $870 #TRS-005S 

TRACTOR FED MODEL PRINTER $1350 #TRS-006 

LINE PRINTER III (AND CABLE) $1550 #TRS-007 

MOD II 64K $3400 #TRS-008 



TERMS: Shipment normally within one week of receipt of your order (with cashier's 
check, money order, or credit card) for microcomputer and three weeks for ac- 
cessories (checks take two weeks extra to clear bank). ADD $2.50 PER ITEM for 
HANDLING. Everything will be sent to you with UPS freight charges COLLECT. 

'NOT UPGRADED USED OR RECONDITIONED LEVEL I's WITH OLD KEYBOARDS 
BUT BRAND SPANKING NEW TRS-80's IN FACTORY CARTONS WITH FULL FAC- 
TORY WARRANTY! COMPARE PRICES AND QUALITY AND ORDER FROM MOM's. 



CASIO'S NEW C-80 

CALCULATOR 

CHRONOGRAPH 



has lightweight attractive ruggedly 
built black plastic water-tight case 
and band, regular digital watch fea- 
tures of hours, minutes, seconds, AM/ 
PM and day on display PLUS two time 
zones, calendar and a 4 function cal- 
culator! You've seen it advertised in 
the Wall Street Journal for $75 . . . 
MOM's price is only $69.95. Hurry, our 
supply is limited . . . order #PC80 
now. 




HONEYWELL 

15 Honeywell ASR-33 Communi- 
cations Consoles with TTY, 
paper tape reader and punch. 
Used, working when removed 
from service. Shipped freight 
collect or you pick up. Weight 
300 lbs. $395. Order #P006. 
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BOOK CLEARANCE 

UP TO 50% OFF 

Chemistry with a Computer (Edu- 
comp-publisher) #8K1010 — was 
$9 95, now $5.00. 

Computer Dictionary (Camelot- 
pubiisher) #8K1018— was $5.95. 
now $3.00. 

FORTRAN Programming (Came- 
lot-publisher) #BK1019— was 
$7.95. now $4.00. 

FORTRAN Workbook (Camelot- 
publisher) #BK1020— was $4 95. 
now $2.50. 

A Quick Look at BASIC (Camelot- 
publisher) VBK1043— was $4.95. 
now $2.50. 

How to Buy and Use Minis and Mi- 
cros (Sams-publisher) «BK102S 
—was $9.95. now $5.00. 

How to Program Microcomputers 
Sams-publisher) #BK 1027— was 
$8.95. now $4.50. 

Your Own Computer (Sams-pub- 
lisher) #BK1072— was $1 95. 
now $1.00. 

8080A Bugbook (Sams-publisher) 
#BK1103 — was $9.95. now 
$5.00. 

Periodical Guide 1976 (Berg-pub- 
lisher) #BK1041— was $3.00. 
now $1.50. 

Periodical Guide 1977 (Berg-pub- 
lisher) #BK 1042— was $3.00. 
now $1.50. 

Underground Buying Guide (PMS- 
King-publisher) #8K1067— was 
$5.95. now $3.00. 

Understanding Microcomputers 
(Scelbi-publisher) #BK1079— 
was $8.30. now $4.00 

Compulator (TAB-publiSher) 
«8K1012-was $7.95. now $4. 

The Story of Computers (Camelot- 
publisher) «BK1056-was $4 95. 
now $2.50. 

Fun with Computers and BASIC 
(Camelot-publisher) #BK1021- 
was $6.95, now $3.50. 

Introduction to Microprocessors 
(Microlog-publisher) #BK1032 
was $17.50, now $8.75. 

Microcomputer Dictionary (Matrix- 
publisher) #BK1034-was $15.95. 
now $8. 

Microcomputer Primer (Sams-pub- 
lisher) #BK1035-was $7.95. now 

$4 

Home Computers Questions and 
Answers. Hardware. (Dilithium 
Publishers) was $7.95 now $4.00 
•BK1023. 



IcMal QAI fI 

■ MAIL ORDER MICROS — ^7& L J ^"^ 1 1 

■ Doot. MO *PO Box 427* IWortboroNH 03455 -•** ^^^^ * » ■*■■■ ■■^■W 

■ Phone: (BOS) 0I4-3O41 * J* Vi. J 


SIMULATED SURVEILLANCE VIDEO SYSTEMS 

Since the video camera systems are totally psychological, that is, the visibil- 
ity and suggestion of video cameras is what deters the thief's desire to steal, 
all that is really needed is a device that appears to be a functioning video 
camera. The SSV System provides the businessman with the same deterrent 
to crime as real systems at a fraction of the cost, because the cameras and 
alarm boxes are empty of electronics, but would-be crooks don't know this, 
and SSV Systems are extremely realistic in detail. Some scan back and forth 
and all have red neon lights. They feature easy installation, mount on any wall, 
have metal construction throughout, with wrinkle finish paint, all aluminum 
lens barrel with f-stops, footage markings, and convex optics, simulated coaxi- 
al cable and wall plate, manufacturer's unconditional guarantee, plus warning 
stickers included with all orders. 

SVS 900 Scanning camera features 155 degree scanning action, long-life 
quiet. 1 rpm motor, only $100 (regularly $1 19.95) catalog • P0010. SVS-880 sta- 
tionary camera is adjustable to any angle for fixed view coverage with moun- 
ting brackets and hardware, only $50 (regularly $58.95) catalog # P001 1; or go 
first class with the SVS-2000, which has a soft blue finish with satin mylar trim 
only $1 05 (regularly $ 1 24.95) catalog # P001 2. the stationary version is only $55 
(regularly $62.95) catalog # P0013. Alarm boxes are only $20 (regularly $24.95) 
catalog # P001 4 and complete your look of having rea I surveil lance equipment 
installed at your business, home or office. 




HEAD ALIGNMENT KIT 

Best cassette recorder tape head 
alignment kit available. Solves 
loading problems. DKOOl-only 
$9 95 

PANASONIC 

TAPE DECKS 

Panasonic RS261 US Stereo 
Cassette Decks— with auto- 
stop, record level adjust. VU 
meters, used condition: all have 
had heads replaced and 
aligned. #T001-$50. 
Panasonic RS260 US Stereo 
Cassette Decks same as 
above, but also ha' bias switch 
for chrome tapes «ro02-$50 

MOM'S SOFTWARE 

SPEED READING 
COURSE 



SPECIAL PRICE includes more than 20% 
discount. * indicates extra price reduc- 
tion since last ad. 

Quantities are limited, immediate refund 
if ordered item is no longer available. 

TERMS: FOB Marlboro. NH USA Limited 
stock; everything guaranteed as de- 
scribed; you pay postage on returns. 
PRINT orders clearly. Minimum order $10 
plus $2.50 shipping and handling charge 
in USA only DOUBLE THAT ELSE- 
WHERE Orders over $50 add 5% for 
shipping in Continental USA. 10% else- 
where. (We will refund excess.) Orders 
shipped UPS or insured mail only No 
COD's please Send US funds by check or 
money order. For credit card purchases, 
add 4 •/• , list AE. M C or VISA, number, and 
expiration date. Mail to MOM's. Depart- 
ment 680. PO Box 427. Marlboro NH 
03455. 

CundWuii of Inven to ry 

New = original container 
Excellent ■ new, but not In original 
container 
Good » tested or used in store 

• Phone answered by machine. Orders 
taken with credit cards. Ouestlons 
am wored by mall. Please leave your 
name and address. 




^toim 



VERBATIM MINI DISKS 

For TRS-80. Pet. Apple 
(Please specify which) 
10 PACK— ONLY $24.50 
•P007 MOM's offers the 
Best for Less . . Again! 



MAGIC LIGHT 
BULB SAVER 

II you've got a light bulb you need 
our MAGIC LBS which increases 
the h'e expectancy of a new bulb 
33 times' and saves you 44' > 
on energy costs Regularly S2 50 
MOM s price is Si 99 each 
•LS001 



Could be the most 
important program 
you'll ever buy. 



A tachistoscope simulation 
which enables the user to in- 
crease reading and compre- 
hension speeds A must for 
any TRS80 16K Level II 
owner Only $5 per cassette. 
Order #R2001 
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Delivery: 3 to 6 weeks Personal checks 
take about 2 weeks to clear bank 
before we ship. 
Enclosed $ 



AE 



Bill. 

Card no. 
Name . 
Address 
City 
Ship: 



MC 



VISA 



MAIL ORDER MICROS -» 
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gressive. step-by-step course This book is both an educational 
text and a self-contained reference book, useful to both the begin- 
ning and the experienced programmer who wish to learn aboul the 
Z-80 Exercises to test the reader are included $14.95 * 

• Z-80 SOFTWARE GOURMET GUIDE AND COOKBOOK - BK1045 
-by Nat Wadsworth. Sce'bi's newest cookbook* This book con- 
tains a complete description of the powerful Z-80 instruction set 
and a wide variety of programming information. Use the author's 
ingredients including routines, subroutines and short programs. 
choose a time-tested recipe and start cooking! $14.95.' 



• BASIC BASIC (2ND EDITION) BK1026- by James S. 
Coan. This is a textbook which incorporates the learning of 
computer programming using the BASIC language with the 

Qv0i 



teaching of mathematics 



100 sample programs il- 



lustrate the techniques of the BASIC language and every sec- 
tion is followed by practical problems. This second edition 
covers character string handling and the use of dat I 
$9 45/ 



• LEARNING LEVEL ll-BKll75-by David Lien. Written 
especially for the TRS-80, this book concentrates on Level II 
BASIC, exploring every important BASIC language capability 
Updates are included for those who have studied the Level I 
User's Manual. Sections include: how to use the Editor, dual 
cassette operation, printers and peripheral devices, and the 
conversion of Level I programs to Level ll. $15 95.* 

• TRS-80 DISK AND OTHER MYSTERIES- BK1181 -by Harvard C. Pennington. This is the definitive work on the TRS-80 disk 
system, it is full of detailed How to * information with examples, samples and in-depth explanations suitable for beginners and 
professionals alike. The recovery of one lost file is worth the price alone $22 50 * 

• Z-80 ASSEMBLY LANGUAGE PROGRAMMING- BK1177-by 
Lance A Leventhai. This book thoroughly covers the Z-80 instruc- 
tion set, abounding in simple programming examples which Illus- 
trate software development concepts and actual assembly 
language usage. Features include Z-80 I/O devices and interfacing 
methods, assembler conventions, and comparisons with 
8080A/8085 instruction sets and interrupt structure. $12 50.* 

• INTRODUCTION TO TRS-80 GRAPHICS - BK1 180- by Don In 
man. Dissatisfied with your Level I or Level II manual's coverage of 
graphics capabilities? This well-structured book (suitable for 
classroom use) is ideal for those who want to use all the graphics 
capabilities built into the TRS-80 A tutorial method is used with 
many demonstrations. It is based on the Level I, but all material is 
suitable for Level II use $8.95 * 

• THE INCREDIBLE SECRET MONEY MACHINE- BK1178-by 
Don Lancaster A different kind of 'cookbook * from Don Lan- 
caster Want to slash taxes? Get free vacations? Win at in- 
vestments? Make money from something that you like to do 7 
You'll find this book essential to give you the key insider details of 
what is really involved in starling up your own money machine 
$5.95.* 

• FREELANCESOFTWARE PUBLISHING - BK 1 1 79 - by B. J. Kofiles. This book .s about money and 
how to make it by writing and selling computer programs.'' (author s foreword), if you have the skills to 
write a saleable program, you now need to acquire the skills to sell that program This compact book 
comprehensively covers the entire publishing process and many aspects of software salesmanship. 
$14.95.' 




V 
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• THE BASIC HANDBOOK- BK 11 74 -by David Lien. This book is 
unique II is a virtual ENCYCLOPEDIA ol BASIC While not favoring 
one computer over another, it explains over 250 BASIC words, how 
to use them and alternate strategies. If a computer does not 
possess the capabilities of a needed or specified word, there are 
often ways to accomplish the same function by using another 
word or combination of words That's where the HANDBOOK 
comes in. It helps you get the most from your computer, be it a 
"bottom-of-the-line micro or an oversized monster $14.95 ' 

• ADVANCED BASIC - BK 1000 -Applications and problems by 
James Coan is for those who want to extend their expertise with 
BASIC. Offers advanced techniques and applications. $965.' 

• PIMS: PERSONAL INFORMATION MANAGEMENT SYSTEM - 
BK1009 - Learn how to unleash the power of a personal computer 
for your own benefit in this ready-to-use data-base management 
program. $995.' 

• PAYROLL WITH COST ACCOUNTING- IN BASIC -BK1001 - 
by L. Poole & M Borchers. includes program listings with remarks, 
descriptions, discussions of the principle behind each program, 
file layouts, and a complete user's manual with step-by step in- 
structions, flowcharts, and simple reports and CRT displays. 
Payroll and cost accounting features include separate payrolls for 
up to 10 companies, time-tested interactive data entry, easy cor- 
rection of data entry errors, job costing (labor of distribution), 
check printing with full deduction and pay detail, and 16 different 
printed reports, including W-2 and 941. $20 00.* 

• LOW-COST, PERSONAL COMPUTER-BASED INVESTMENT DECISION SYSTEMS- BK1 101 - Use this guidebook by Man 
Computer Systems, inc.'s president, Jerry Feisen, to develop inexpensive personal computer systems that can help you make 
better investment decisions. $16.00.' 

• HOW TO MAKE MONEY WITH COMPUTERS- BK1003 -In 10 information-packed chapters. Jerry Feisen describes more 
than 30 computer-related, money-making, high profit, low capital investment opportunities. $15.00.' 
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m RETURN 
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• SOME COMMON BASIC PROGRAMS- BK1053- published by 
Adam Osborne & Associates. Inc Perfect for non-technical com- 
putensts requiring ready-to-use programs Business programs, 
plus miscellaneous programs. Invaluable for the user who is not 
an experienced programmer Ail will operate in the standalone 
mode $12.50 paperback.' 

• WHAT TO DO AFTER YOU HIT RETURN - BK1071 - PCC 8 first 
book of computer games 46 different computer games you can 
play in BASIC . . . programs, descriptions, many illustrations. 
Lunar Landing, Hammurabi, King, Civel 2, Oubic 5, Taxman. Star 
Trek, Crash. Market, elc. $10.95 * 

• BASIC COMPUTER GAMES- BK 1074 -Okay, so once you get 
your computer and are running in BASIC, then what? Then you 
need some programs in BASIC, that's what. This book has 101 
games for you Irom very simple to real buggers. You get the 
games, a description of the games, the listing to put In your com- 
puter and a sample run to show you how they work Fun. Any one 
game will be worth more than the price of the book for the lun you 
and your family will have with it $7.50 ' 

• SIXTY CHALLENGING PROBLEMS WITH BASIC SOLUTIONS 
(2nd Edition)- BK1073-by Donald Spencer, provides the serious 
student of BASIC programming with interesting problems and 
solutions. No knowledge of math above algebra required. Includes 
a number of game programs, as well as programs for financial in- 
terest, conversions and numeric manipulations $6.95 * 



s. 
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PREVIEW 



HOME 
DISTRIBUTION 



THE BASIC 

SWITCHYARD 

YourTRS-80, given the same set 
of instructions and data, will 
always arrive at the same conclu- 
sion. A railroad train, given the 
same track and switch settings, 
will always arrive at the same 
destination. Using this as an 
analogy, we investigate the way 
BASIC works and follow the inter- 
preter through some programs. All 
aboard for BASIC, next month in 
80. 



If you're involved in one of the 
many home distributorships, or 
vending is your business, then this 
article is a must. With it you can 
save time and make money! The 
programs given are designed for 
use by Amway product distribu- 
tors, but could be adapted for use 
by many other businesses. 



DATA FILE 

MANAGEMENT 

If you can believe in anything in 
these days of intensive advertising 
hype, then believe that if there is 
any "real power" hidden inside 
your TRS-80 it's hidden inside the 
expansion interface — home of the 
disk controller chip. The use of 
disks opens up a tremendous 
"power," to manipulate data. 
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Ask for Instant Software at a computer store near you. 



Alabama 

Anderson CoT-puitu 

3158 Unrvernly Dr , HunlSvUle 

Computerland ot Huntsvilie 

3020 University Dr.. Huntsvilie 

Olensky Bra* 

3763 A.rporl Blvd Mobne 

Arizona 

Mam Shack 

4506 AN 16th St Phoenla 

Millets TV 4 Radio 

82i Eaal Broadway. Mesa 

California 

Byla Shoo 

8038 Clairmont Man Blvd . 

San Diego 

Byla Shop 

123 E Yorba Linda Placentia 

Byte Shop o( Mi View 

1418 Weil El Camino Rail. Ml View 

Byla Snop o' Sacramento 

8041 Greenback Ln . Curus Heights 

Capital Computet Systems 

3388 El Camino Ave., Sacramento 

Computers Made Easy 

H9 East Ave. 00. Palmdaie 

Compute' Store o< San Leandrc 

701 MacArthu' Blvd San leandro 

Computer World 

8791 Westminster Ave Westminster 

Computer land 

16720 S Hawthorne. Lawndale 

Computenand ol W lA 

6640 La Cienega Blvd . ingtewood 

Coast Electronic* 

3118 No Mam St Mo'roBay 

Computerland 

240(!1 via Fabr.cante No 904 

Mission V«|o 

Hob** Ironies 

'378 So Bascom Ave San joss 

Hobby World 

195 M BLSinesaCtr Or Unrt 6 

Bonhndge 

ICE House mc 

398 Norm E St San Bernardino 

Jade Computer Products 

4901 W Rosecrens Hawthorne 

Marlam Co. 

6351 Almaden Bd San Jose 

Opamp/Technical Books 

1033 N Sycamore Ave . Los Angeles 

Q I. Computers tnc 

15818 Hawthorne Blvd lawndale 

Radio Shack Dealer 

8250 M«a Mess Bivd San dago 

Radio Shack Dealer 

50 N Cebniio Hwy Halt Moon Bay 

Santa Rosa Computer Center 

604 Ml St Santa Rosa 

Suver Spur Elect Comm 

13552 Cent's. Ave Chmo 

T->e Computer Store 

820 B'oadway. Santa Monica 

Colorado 

Byte Shop 

3464 S Acnma Si Engiewood 

Colorado Computer Systems 

3- 1 vV 74th Ave Westminster 

Computerland ol Noith Denver 

6749 Wadswo-th B vd A-.ada 

Computer Shack 

1635 South Piaine. PueWo 

The Computer Store 

2300 Wwion Si Denvei 

Connecticut 

American Business Computers 

454 Thames St Groton 

Compuls'iaO 

130 Jellerson. New London 

Computerland 

1700 Post Rd. Fairfield 

Compotetiand 

60Sk.'ISt Hamden 

Computer Works 

1438 Post Rd E Liberty Pi«a. 

Weatport 

o.c. 

The Program Sice 

4200 Wisconsin Ave N W 

Washington. D C 

Florida 

Adventure international 

200 Bald Cypress Ct Longwoud 

AMF Electronics 

11146N 30th St . Tampa 

Boyd Ebert Corporation 

1328 West 15lh SI . Panama City 

Computer Center 

6578 Central Ave . St Petersburg 

Computerland o> Ft Lauderdale 

1963 N Federal Hwy Ft Lauderdale 



Computerland ol Jacksonville 
2>"t University Blvd W 
Jacksonville 

Computs'iand ol Tampa 

1520 E Fowler Ave , Tampa 

Compute' Shack 

3336 Beach Bivd . Jacksonville 

Curtis Waters Enterprises 

238 Talbot Ave Metbou.n, 

Heath Kit Electronic 

4705 W 16th Ave Center Hiaieah 

his Computermation 

12K Cypress Ave . Melbourne 

Sound Ideas 

2201CNW i3th. Gamesvnie 

Ukatan Computer Store 

Airport Rd Oeatin 

Williams Radio A TV Inc 

2062 Liberty Si Jacksonville 

Georgia 

Atlanta Computer Mart 

Atlanta 

Computerland o' Atlanta 

2423 Cobb Parkway Smyrna 

Hawaii 

Computenana ol Hawaii 
587 N federal Hwy . Honolulu 
Radio Shack Assoc Store 
1712 S King St. Honolulu 

Idaho 

Electronic Specialists 
8411 Faarview Ave Bone 

Illinois 

Computerland 

4507 Moth Ste'lmg. Peoria 

Computenand 

9511 N Milwaukee Ave. Nile* 

Computer Stat .on 

3659 Nameoki Rd . Granite City 

Midwest Micro Computers mc 

708 S Mam Si Lombard 

Kansas 

Central Kansas Computers 
6 S Broadway Hermgton 

Main* 

Main Computronics 

intown Ptua Bango' 

Radic Shack 

315 Mam Man Rd So Portland 

Maryland 

Jack Five* Electronics 

4808 DeOl«n Circle. Prkeev.iie 

rtve Comm Center 

9634 Ft Meade Rd Laurel 

Massachusetts 

CompulevCity 

175 Mam St Chavrleetown 

Comput.-i 

50 Worcester Rd F remmghem 

Computerland ol Boston 
2 1 4 Worcester Re Weiiesley 

Computer Packages Unlimited 
244 W aoylslon St West Bojision 

Computer SOUware 
14 Fail Rive» Ave Renooalh 
New England Eiecirorucs Co 
679 Highland Ave Needhem 
The Computer Store 
120 Cambridge Si Burlingto- 
Tu'u Radio 1 Eiecltomcs 
206Myst-. A,e,Medtora 

Michigan 

Compute' Cenle' 

28251 Ford Rd Garden C'ly 

Computer Connections 

38437 Grand River Farmington Hiiij 

Computerland of Grand Rati'ds 

7927 2Sfh St S E . Kentwood 

Computerland ol Rochester 

301 S Livernon Rochester 

Computerland of Soulhlield 

296 73 Norl n western Hw y South! lew 

Computer Mar! 

580 W 14 MM Rd Clawson 

Hobby House 

1035 W Territorial Rd Ball t Creek 

The Alternate Source 

1806 Ada Lansing 

re Otoe Teacher Shoppe 

1823 Witmyre St . Ypsilann 

Minnesota 
Computenand ol Hopkins 
1 1319 Hwy F .Hopkins 

Digital Den 

Minnesota So'tware inc 

5422 Fisher St White Bear Lake 

7lm Computers 

5717 Xemes Ave N Brook tin Center 

Mississippi 

Dyef'S, We 

200 l Mam Si West Point 



So'twarenouae 
816 Foley st Jeeksert 
W Vernon Foster Inc 
816 Foley St . Jackson 

Missouri 

Comoutervan m.-. 

5i Florissant Oaks Shopping Center 

Florissant 

Consolidated Software 

16501 Greenwaid Court Bolton 

Montana 

tnlermouniam Computer 

529 So 9tn St l rvingslon 

Personal Computer 

121 Red Oak Or Can Junction 

The Computer v. 

1216 16th SI W 131 

Nebraska 

Computerland ol Omaha 
H031 Elm SI Omaha 
Midwesi Computer Co Inc 
6825 I SI Omaha 

Midwesi Computet Co Inc 
4442 S 84th St Omaha 
Midwesi Computei Co inc 
4403 S 87th Bt Omaha 
ScottsBlu" Typewriter :ic 
i«24 B'oedway. ScotlsBtu'l 

Nevada 

i 

4586 Spring Moumam Rd . Las Vegas 

New Hampshire 

Biisnbytes Computer Center 
568 Pleasant St Concord 

■City 
1525 S W'low. Manchester 
Pauls 'V 
Mam Si Fremont 
Portsmouth Computer Center 
31 Raynes Ave . Portsmouth 
Radio Shack Assoc Store 
Fairbanks Plaia Keene 

New Jersey 

Computer Encounter 

2 Nassau St . Princeton 

Computerland 

36 Pia/a Rte *4 W Paramos 

Computer Man ot NJ 

501 Rie 2' IseHn 

Dave s Electronics 

Pennavine Shopping Ctr , PennmrHle 

GHB Enterprises Inc 

Rio 38. Rudderaw Ave Mapiesnade 

Personal Computing Inc 

5i Central Sq Llnwood 

Radio Shack/JAJ Electronic 

Mans'ieid Shoppkng Ctr 

Rl 57 Alien Rd . Hackettstown 

The Bargain Brothers 

Glen Roc Shopping Center 

218 Scotch Road. Trenton 

The Computer Emporium 

Btdg 103. Avenues ol Commerce 

2428 Rte 38 Cherry Hill 

New Mexico 

Autel Electronics Co 

232 Wisconsin N E . Albuquerque 

Legey and Associates 

2906 Tahiti Ct N E Albuquerque 

Mitchell s Music iRedio Sheen 

407 W Church. Cansbad 

South West Computer Center 

121 Wyatt Drive Suite 7 Las crimes 

New York 

AristoCraii 

314 Filth Ave NYC 

Bits 8 Bytes 

2800 Straight Rd . Fredonia 

Computer Corner 

200 Hamilton Ave . While Plains 

Computer I 

1570 3rd Ave New York 

Computer Factory 

485 Leaingtcn Ave . NYC 

Computer House M 

721 Atlantic Ave Rochester 

Computerland ol Nassau 

79 Westbury Ave Carle Place 

Compute' World 

519 Boston Post Rd . Pol Chester 

Comtek Electronics Inc 

2666 Coney island Ave. Brooklyn 

Comtek Electronics mc 

Slater island Mall 

Store 220A Staten island 

Ogieyte Systems Corp 

31E 31st St New York 

Home Computer Center 

871 Monroe Ave Rochester 

Key Electronics 

. hi -iii 

Lashen Electronics lie 
21 Broadway Deny ,e 



Instant Software Inc. 



Peterborough, N.H. 
^«o 03458 



M' Computer 

imp Pie/a Rte 9 Wappmgers Falls 

Sotlion Systems 

306 Columbia Turnpike Rensselaer 

The Computer Tree mc 

*06 Hooper Rd Enriwell 

Dpstale Computer Shop 

629 Fiench Rd Campus Puua 

New Herttord 

North Carolina 

Byte Shop ol Raie-gh 

121 J Hillsborough St Raleigh 

Onto 

Aitair Business Systems inc 
- DraieOr Dayton 
Aslio Video Electronics 
504 E Mam St Lancaster 

Ctnetmatl Computer Store 
4fll6 Interstate Or . Cincinnati 

Computerland 
4579 Great Noithern Bivd 
N Otmstead 
Computerland 

6429 Buscn Bhrd Columbus 
Computerland 

1288 Som Rd Maytiek) Heights 
Computer Store ot Toledo 
18 H.iiwyck Dr . Toledo 
For bee* Microsystems Inc 
35 N B/oad FaHbom 
Microcomputer Center 
7900 Paragon Rd Dayton 

Computer World 
74 Rotxnwood Columbus 
Universal Amateur Radio Inc 
1260 Arda D' Columbus 

Oklahoma 

Sounds Etc 

My* 13 Watonga 

• Products 
Radio Shack Dealer 
114 W Tati Si Sapulpa 

Oregon 

Computerland oi Portland 
12020 S W Main Si T.garrt 
Computer Pathways Ur rf 
2151 Davcor&t S E Salem 
TRSaO Producis I Id 
3520 S E V neyarc Rd Portland 

Pennsylvania 

Artec Elect 

302 Wyoming Avi 

Artco Elect 

Back Mountain Shop Oil 

Shavrartown 

Audio Man 

518FitthAve New Brighton 

Computer Wu'ksnoppe 

3848 William Penn Hwy Monroevllle 

Computerland ot Hamsburg 

4644 Carlisle P.ke. Mecharvicsburg 

Erie Computer Co 

21 27 West Mh St. Erie 

Mighty Byte Computer Center 

537 Easion Rd . Horsham 

Personal Computer Corp 

24 26 West Lancaster Ave , Paoii 

Personal Computer Corp 

F rarer Man Leicester Ave fra.-er 

Rhode Island 

Computer Crty 

165 Angell St Providence 

South Dakota 

C8 Radio Snack 

21st and Broadway Yanmon 

Tennessee 

Compule'iab 

671 S Menden Hsu Rd Memphis 

•.'dromes Inc 
509 N Jackson Si Tullahoma 

Texas 

Computer Port 

926 N Collins. Arlington 

Houston Computer Tech 

53i3Bissooet. Beiiarte 

Interactive Computer 

762C Oasnwood. Houston 

KA Elect 

9090 Siemmon* Frwy Deltas 

Pan American Elect Inc 

1117 Conway. Mission 

Radio Shack Dealer 

21969 Katy Freeway. Katy 

Ram Mico Systems 

6353 Camp Bowie Blvd.. Ft Worth 

WaghaMer Books Inc 

3 Greenwav Piara E . Houston 

Utah 

DC Computer Co 

1911 West 70 South Provo 

Quality Technology 

470 E 2nd So Sail Lake Crty 

Virginia 

Computer Works 

Rte 6 Boa 65A, Harrisonburg 



Home CompuU- 
2927 V.igm, a Be* 

Beech 
Soulhside Raoio Comm 

■ 

Washington 

flmannssi Mawcani . 

,4ih u ■ Ave s Beanie 

Byie Shop o' Belir»v„n 
1470' NE ?0lf St MsNIM 

1500 S .«..•» 

Federa. Way 

Magnolia Man 

28<2 Thorndyke A. 

Personal Computers 

S 104 Freva. Spokane 

Y« CHd Compute' Shop 

130' G Washington Richland 

West Virginia 

The Computer Coiner Inc 

22 Beechurst Ave , Morgantow" 

The Computer Store 

Munieoel Parking Bldg Charleston 

Wisconsin 

Byte Shop O' Milwaukee 

6019 West Leylon Ave Greeniieid 

Computerland 

890 S Whune, Way Mad.son 

Petted M.casystim* 

4265 W Looms Re Milwaukee 

Wyoming 

Computer Concepts 

1104 Logan Ave Cheyenne 

Puerto Rico 

The Microcomputer Store 
1568 Ave Jesus T P.nero 
Caparia Tw-ace 



Canada 



CANADIAN OtST ii I 
• huiing 

USV 2AS 



Computertend of Wmmpeg 

' 
Compumart 

411 RoosevrjItAve. Ottawa. Onia'io 
Micromatic Systems Inc 
101 8136 Park Rd . Richmond B C 
Micro Shack ol W Canada 
333 Park Street. Regma Sask 
Orthon Holdings Ltd 
12411 Stony Plain Road 
Fdmonti-in Alberta 
Total Computr" S 
A|a> O«lano 

Austria 

Byte Shop Microelect'onK 
Favootenstr 20 Wien 

England 

Mighty V 
J3CardlttRd W,n 

France 

Sivrsa s.a. 

20. Rue de Leningrad Pans 

Italy 

HOMIC s r I 

P'S&ta De Angeli 1 Milano 

SwMzertand 

Tandy Corp 
Baalarstr 145. 2uench 
West Germany 



EUROPEAN DISTRIBUTOR 
Microshop Bodensee 
Markstr 3. 777p s' 



AAA Electronic 

Hababurgerstr 134 Freiburg 

Basic Software und Schuiung 

Constentinstr 88 Koem 21 

Electronic Hobby Shop 

Meaimiiienslr 22. Bonn 

Hennrger Computers 

Land —hi s ir 36. Muenchen 2 

Miciocomputev Canter 

Aisteirjersir 7. Darmstadt 

MuennnJohi 

Toetiersli 5. Hou-kirchen 

R . RElew ti 

Adterslr 55. Heidelberg 

Australia 

Computer Country Pty Ltit 

5 Tonkin Ave . Balwyn VIC 

Deforest Software 

36 Gien Tower Drive 

GlenWaverly VIC 

Sure Load Software 

P O Boa 26 Weston. AC T 

South Africa 



SOUTH AFPlCAN DISTRIBUTOR 

Fnflie taiberg 

P O Box 7*5 Johannesburg 




STARTER KIT 



EXATRON STRINGY FLOPPY FOR THE TRS-80 

Recommended initial purchase: 

Exatron Stringy Floppy $249.50 

3 Wafers each: 5', 10', 20', 50' 40.00 

Bus Extender. 2 for 1 15.00 

ESF Machine Language Monitor 9.95 

Wafer Organizer 5.00 



SPECIAL PRICE FOR THIS STARTER KIT 
Sales Tax (California only) 
Shipping and Handling 



S299.50 



5.50 



S319.45 



TOTAL 



For more information see the current Exatron Stringy Floppy Owners Association Newsletter in Microcomputing. 

Stringy Floppy is a trademark of Exatron Corporation. 

HOT LINE (For calls Outs.de ca) 800-538 8559 



If you have any questions about the product, about Exatron, or 
ESFOA, please call the Hot Line. Address letters to ESFOA, 3559 
Ryder St.. Santa Clara, CA 95051. 




^excellence in electronics 



exatron 

3555 Ryder Street ■ Santa Clara, California 95051 
(408) 737 7111 



